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>ple  SpeedCalti 

A  Powerful  Spreadsheet 
Programs  Inside  For  II +,  lie.  He 


Introduction  To 
AmigaDOS,  Part 
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High  Rise 

Exceptional  Arcade  Game 
For  Commodore  64,  128, 
Atari,  And  Apple 

Cornmodore 
Speedy  Strings 
A  New  Technique 
For  Fast-jLoqiiihg  Data 

ST  Doodler 
A  Drawing  P 
For  520ST  Lo 

IBM  Screen  Swa|»pfng 

Instant  Animation 

With  Page-yi^ng^^^^^g 

High-Speed  Sfqrch 
For  Atari 


Here's  what  you  caii  do  witli  your  Apple  11.  * 


INTRODUCING 

Discovery  Software 
fromWorld  Book 


Great  Gifts  for  your  child 

Settling  America 

A  survival  simulation  program 
featuring 

•  practice  in  making  value 
Judgements 

•  pfaclice  in  making 
decisions 

•  helps  expand  knowiedge  of 
posl-Revoiuiionary  America 

Data  Hurdles 

A  data  use  skills  review 
program  featuring 

•  ten  activities  that  review 
ordering,  rounding,  sets, 
totals,  fast  math,  time, 
moiey,  percentages, 
measuring,  and  comparing 

•  on-screen  tutorial  skill 
revewa 

•  tliree  levels  of  dilficuity 

Educational  software  that  understands  the  learning  process 

Disco\'erv  Software  from  World  Uook 
For  Apple®  IIc/Ilc 

•  Six  programs  now  available 
(Intermediace  —  age  10  and  up) 

•  Seven  more  programs  available  January',  1986 
(Primary  —  age  6- 10) 


When  discovery  occurs, 
learning  begins. 

Choose  great  software  gifts  from 
XX'orld  Book — long  a  trusteij  name  in 
educational  information.  Discovery 
Software  from  World  Book  reinforces 
your  child's  basic  education  in  con- 
tinually entertaining  program  formats. 

Each  program  in  Discovery 
Software  from  World  Book  has  been 
tested  and  evaluated  by  educators, 
consultants,  and  children.  Included 
with  each  program  is  a  unique 
Discovery  Workbook  of  activities 
and  projects  which  you  can  use  to 
strengthen  learning  skills  presented 
in  the  software. 

Give  your  child  the  gift  of  educa- 
tional discovery.  Give  Discovery 
Software  from  World  Book. 
See  vour  local  software  dealer 
or  call  1-800-292-9090. 
(In  Ohio  call  1-800-423-7755). 


Spell  Bound 

^H 

WTiizCalc  I 

A  crilicai  ttiinking  skills  review 

H^MI^ 

^H 

An  afiltimetic  skills  review 

orogram  featuring 

" 

program  featuring 

•  vocabulary  reinforcement 

•  practice  of  basic  aritnmetic 

througti  use  of  verbal 

Hb^HH^BlRr 

■t-. 

operations 

analogies 

H^^^" 

> 

•  nine  levels  of  difficulty 

•  four  ievels  of  difficulty 

•  a  "Create  Your  Own 

Problems"  option 

Fast  Break 

■ 

Run  for  President 

A  punctuation  skills  review 

w 

A  social  studies  program 

program  featuring 

^^SJ 

featuring 

•  explanation  of  commoniy 

L^@^ 

•  review  of  geograpfiy  facts 

used  punctuation  marks 

iS^ 

about  tne  United  States 

•practice  in  using 

>, 

•a  review  of  U.S.  state  facts 

punctuation  marks  in 

^^^^•f             1 '  '     " 

context 

•  four  levels  Of  difficulty 

For  other  microcomputers: 

•  21  programs  a\'ai!able  now  (Seven  each  in 
Preschool  age  5-5,  Primary,  and  Intermediate) 

Discovers-  Softwate  from  «orld  Book  is  a  tradcmatk  of  VCorld  Book.  Inc. 
©  1985  Apple  Compurer.  Inc.  Apple  and  the  Apptc  Ingo  arc  regisiercd 
trademarks  of  ,^ppk'  Computer.  Inc 


^^'^  World  Book  Discovery,  Inc. 


5~0U  Lombatdo  Centre.  Suite  1 20 
Seven  Hills,  OH -14131 
1-800-292-9O9O    (In  Ohio  1-800-123- 
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We  dorit  care 
which  computer  you  own. 

Well  help  you 
get  the  most  out  of  it. 
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CompuServe  puts  a  world  of  infon 

CompuServe  is  the  world's  largest 
information  service  designed  for  the  per- 
sonal computer  user  and  managed  by 
the  communications  professionals  who 
provide  business  information  services  to 
over  one  quarter  of  the  FORTUNE  500 
companies. 

Subscribers  get  a  wealth  of  useful, 
profitable  or  just  plain  interesting  infor- 
mation like  national  news  wires,  home 


shopping  and  banking,  travel  and  sophis- 
ticated financial  data.  Plus  electronic 
mail,  national  bulletin  boards,  forums 
(special  interest  groups),  and  a  multi- 
channel CB  simulator. 

You  get  games  and  entertainment,  too. 
Board,  parlor,  sports,  space  and  educa- 
tional games.  Trivia  and  the  first  online 
TV-style  game  show  played  for  real  prizes. 

To  buy  a  CompuServe  Subscription  Kit, 


entertainment  at  your  fingertips. 

see  your  nearest  computer  dealer.  To 
receive  our  informative  brochure  or  to 
order  direct  call  or  write: 

CompuServe^ 

Consumer  Information  Service.  P.  O.  Box  20212 
50CO  Arlington  Centre  Blvd.,  Columbus.  OH  43220 

800-848-8199  lnOHioCall614-457-0802 
An  HSR  Block  Company 
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iguage  Software 


For  Commodore  Computers 


ADA  TRAINING  COURSE 

Teaches  you  the  language  of 
the  future.  Comprehensive 
subset  o!  language.  Includes; 
editor;  syntax  checker,  compiler; 
assembler;  disassembler,  hand- 
book. $39.95 


ADA 
TRAINING 
COURSE 


ASSEMBLERWlONrTOR 

Macro  assembler  and  extended 
monitor.  Supports  all  standard 
functions  plus  floating  point 
constants.  Monitor  supports 
bank  switching,  quick  trace, 
single  step,  more.  $39.95 


LDA jc:;n  DEC 
INX  if^y        NOP 


f^^BRK'iMP^    TAX 

PLA  RTS  CMP^"' 
SEC    PLP   SED 


BASIC  COMPILER 

Compiles  complete  BASIC 
language  into  either  fast  6510 
machine  language  and/or  com- 
pact speedcode.  Supports  over- 
lays and  many  extended  BASIC 
commands.  C-64     $39,95 

0-128  $59.95 


Reference  Books 


SUPER  PASCAL 

Full  Pascal  supports  graphics, 
Sprites,  file  management,  more. 
Supports  pointers,  dynamic 
memory  management,  machine 
language.  Compiles  to  fast  65 10 
machine  code.  C-64  $59.95 
C-128  $59.95 
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ANATOMY  OF  C-6*  Insidor's  guide  to  Ihs  '6<l 
(niarnals.  Graphics,  sound,  I/O,  kernal.  memory 
maps,  and  much  more.  Complete  commented 
ROM  listings.  300pp  $19.95 

atesl  handbook 

with  many 

Fully  com- 

50a+pp     519.95 


ANATOMY  OF  1541  .pmtfB  iss 
on  this  drive,  e^sHi/isQkltlStJga 
examples  p^ogram^^n(^^4'Wi™^ 
mented  1541  ROgi^isffn^ 

MACHINE  LANGUAGE  FOH  C-64  Learn 
6510  code  S  write  fast  programs.  Many  samples 
and  listings  for  complete  assembler,  monitor 
and  simulator.  200pp   $14.95 

GRAPHICS  BOOK  FOR  C-E4  Best  reference, 
covers  basic  and  advanced  graphics.  Sprites, 
Hrres,  Multicolor,  3D-graphics,  IRO,  CAD. 
projections,  cun/es,  more.  350pp  $19.95 

TRICKS  &  TIPS  FOR  C-64  Collection  of 
easy-to.usa  techniques:  aavanced  graphics, 
improved  data  input,  enhanced  BASiC,  CP/M. 
data  hand'ing  and  more.  275pp    $19.95 


1541  REPAIR  3,  MAtNTENANCE  Handbook 
on  the  drive's  hardware.  Includes  schematics  & 
techniques  to  keep  1541  running.  Align  drive  w/ 
S  w/o  scope.  Large  handbook  size.  $19.95 

ADVANCED  MACHINE  LANGUAGE  Sub- 
jects not  covered  elsewhere:  video  controller, 
interrupts,  timers,  I/O,  extensions  to  BASiC.  Tips 
for  the  serious  programmer.  21Qpp    $14.95 

PRINTER  BOOK  C-64/VIC-20  Understand 
Commodore,  Epson  compatible  printers  &  1520 
plotter.  Utilities,  screen  dump,  3D-plol,  com- 
mented MPS-SOl  BOM  listings.    330pp  $19.95 

SCIENCE/ENGINEERING  ON  C-64  In- 
depth  introduction  to  computers  In  science. 
Some  topics  covered  are  chemistry,  physics, 
astronomy,  alflctronicsS  others.  350pp  $19.95 

CASSETTE  BOOK  C-64/VIC-20  Make  your 
eassetia  run  taster  than  a  disk  dnvel  Cassette 
data-base,  disk  to  tape  backup,  tape  to  disk, 
Fas;Tape  operating  system,  22Spp  $14.95 


FORTH  LANGUAGE 

Based  on  Forth  79  (+  parts  of 
'83).  Supports  hires  graphics 
and  sound  synthesizer.  Full 
screen  editor,  programming 
tools,  assembler,  samples, 
handbook.  $39.95 


WSYER 

Professional  development 
package  for  serious  appli- 
cations. Indexed  file  system,  full 
screen  &  printer  management, 
programmer's  aid,  multi- 
precision  math,  royalty-free 
runtime,  more.  $39.95 


MASTER 

Professional 

Davalopmont 

Packaae 


VIDEO  BASIC 

Add  50+  graphic,  sound  and 
utility  commands  to  your 
programs  with  this  super 
development  package.  Free 
distribution  of  RUNTIlVlE  version 
-  no  royalties!  $39.95 


^^^ 


XREF128&XREF-64 

BASIC  cross-reference 

Indispensible  tool  for  BASIC 
programmers.  Finds  all  refer- 
ences to  variables,  constants  & 
line  numbers.  Sorts  in  alpha- 
betical order.  C-64  $17.95 
C-128  $17.95 


Productivity  Tools  T 


TECHNICAL  ANALYSIS  SYSTBVI 

A  sophisticated  charting  and  technical 
analysis  system  for  serious  investors.  By 
charting  and  analyzing  tine  past  history  of  a 
Stock,  TAS  can  help  pinpoint  trends  & 
patterns  and  predict  a  stock's  future.  TAS  lets 
you  enter  trading  data  from  the  keyboard  or 
directly  from  online  financial  services.  $59.95 


PERSONAL  PORTFOLIO  MANAGER  ^ 

Complete  portfolio  management  system  tor 
the  individual  or  professional  investor.  Allows 
investors  to  easily  manage  their  portfolios, 
obtain  up-to-lhc  minute  quotes  &  news,  and 
per'o-m  selected  analysis.  $39.95 
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CADPAK 

A  deluxe  graphics  design  and  drawing 
package.  Use  with  or  without  an  optional 
lightpen  to  create  highly-detailed  designs. 
With  dimensioning,  scaling,  text,  rotation, 
object  libraries,  hardcopy  and  more.     $39.95 


DATAMAT 

Powerful,  easy-lo-use  data  management 
package  using  menu  selections.  Free-form 
design,  50  fields/record,  2000  records/disk. 
Sort  on  multiple  fields  in  any  combination. 
Complete  selection  and  formatting  for 
printing  reports.  ^9.95 
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From  Abacus  Software 
..^  name  you  can  count  on 


IDEAS  FOR  USE  ON  C-6*  Themas;  aulo 
expenses,  calculalor,  recipe  file,  slock  lists,  diet 
planner,  window  advertising,  others.  Includes  all 
program  listings.  2D0pp  $12,95 

COMPILER  BOOK  C-64/C-129  Atl  you  need 
lo  know  about  compilers:  how  they  work, 
croaling  jfogr  own  and  generating  the  final 
machine  code.  30Ct¥  $1 9.95 

Adventure    Gumewriter's    Handbook    A 

step-by-step  guide  to  designing  and  writing  your 
own  adventure  games,  Adventure  game  gene- 
rator &  lour  example  games.         200pp    J14.95 

PEEKS  &  POKES  FOR  THE  C-«4  IncludBs 
in-depth  explanations  of  PEEK.  POKE,  USR, 
and  other  BASIC  commands.  Learn  the  "inside" 
tricks  about  your  •64.  JtKfip  $14.95 


OPTIONAL   DISKETTES  FOR   BOOKS   For 

your  convenience,  the  programs  contained  in 
each  ol  our  books  are  available  on  diskette.  AK 
program  thoroughly  tested  &  error-frog.  Specify 
titie  of  book  when  ordering.  $14.95  each 


BOOKS  COVERING  THE  C-12S 


C-12S  INTERNALS  Detailed  guide  presents  -' 
the    12S's    operating    system,    explains    the 
graphics  chips,   Memory  Management  Unit,  and 
commented  listing  ol  Kernal.       SOQtpp  $19.95; 

1571  INTERNALS  Insiders'  guide  for  novice  ;: 
and  advanced  users.  Covers  sequential  &  > 
relative  files,  and  direct  access  commands,  i; 
Describes  Important  DOS  routines.  Commented  ;: 
DOSIistir^gs.  SOOiw  )^9.95  : 

C-12B  THICKS  &  TIPS  Chock  full  of  info  for  ' 
everyone.  Covers  SO  column  hi-res  graphics,  - 
windowing,  memory  layout,  Kernal  routines.  |l 
sprites  and  more.  300  pfi  $19.95  I: 

CP^  ON  THE  C-1Z8  Essential  guide  to  using  ; 
CP/M  on  your  128.  Simple  explanations  of  the  : 
operating  system,  memory  usage,  CP/M  utility  ; 
prograrris,  submit  files  and  mor^.  $19.96  ' 

COMPUTER  AIDED  DESIGN  on  your  C-128  i 
or  64,  Create  a  CAD  system  using  programs  : 
provided.  Covers  3D  objects  &  rotation,  I 
MACROS,  hatching,  zooming,  mirroring,  line  ( 
widths,  dashed  lines,  more,300  pages  $19  95  ; 


ijpeciai  i-eaiure 
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For  school  or  software  development,  choose  SUPER  C. 
SUPER  C's  powerful  screen  editor  is  full-functioned 
with  horizontal  and  vertical  scrolling,  copy  and  search/ 
replace  for  easy  editing.  Source  files  may  be  up  to  41 K. 

The  SUPER  C  compiler  is  fast  and  creates  link  files.  Up 
lo  seven  separate  modules  may  be  linked  into  a 
ready-to-run  object  program.  To  maintain  C's  portability, 
SUPER  C  supports  the  Kernighan  &  Ritchie  standard 
(without  bit  fields},  making  it  very  complete.  SUPER  C 
also  includes  a  complete  I/O  library. 


Other  features  of  the  SUPER  C  package: 

•  convenient  hexadecimal  and  octal  input 

•  error  file  listed  to  diskette 

■     supports  conditional  compiling 

•  complete  strings  and  arrays 

•  full  mathematical  functions 


^  Sii^:>. 


C-54 

C-128 


$79.95 
$79.95 


JBKS^f^^JlaiSiPi^^ 


XPER 

Caplure  your  information  on  XPER's 
knowledge  base  and  let  this  first  expert 
system  for  Commodore  computers  help  you 
make  imporlant  decisions.  Large  capacity. 
Complete  with  editing  &  reporting.         $59.95 


POWERPLAN 

One  of  the  most  powerful  spreadsheets  with 
integrated  graphics  for  your  Commodore 
computer.  Includes  menu  or  keyword  select- 
ions, online  help  screens,  field  protection, 
windowing,  trig  functions  and  more.  Power- 
Graph  lets  you  create  integrated  graphs  and 
charts  from  your  spreadsheet  data.       $39 .95 


*5.^ 


QU1CKCOPYV2.0 

Back  up  your  valuable  data  with  the  fastest 
disk  copier  we've  seen  to  date.  Copies  an 
entire  disk  In  two  and  a  half  minutes  on  two 
drives  or  three  and  a  half  on  or)e.  $19.95 


CHARTPAK 

Make  professional-quality  pie,  bar  and  line 
charts,  and  graphics  from  your  data.  Includes 
statistical  (unctions.  Accepts  data  from 
CalcResult  and  MuItiPlan.  C-128  has  3X  Ihe 
resolution  o(  the  C-64  version.  Outputs  lo 
most  printers.  C-64        $39.95 

C-128      $39.95 


Ordering  Information^ 


Abacus  iH  Software 


V/SA' 

^EW^-        . 

tm^j 

P.O  Box  721 1  Grand  Rapids,  Michigan  4951 0 

For  Postage  and  handling  include  $4.00  per  order.  Foreign  orders  include 
$10.00  per  item.  Money  order  and  checks  in  U,S,  Dollars  only,  MasterCard, 
VISA  and  American  Express  accecleti.  Michigan  residents  please  include 
4%  sales  tax. 

For  fasf  service  call  (616)241-5510  Telex  709-101 

For  free  catalog,  please  return  this  coupon  or  a  copy  to: 
Abacus  Software,  P.O.  Box  721 1 ,  Grand  Rapids,  Ml  49510 


PHONE:  (616)  241-5510 


Name 
A±iress_ 
City 
State 
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How  to  tumyoiir  computer  on. 


(The  following  is  an  actual 
conversation  between  Bantam  Software 
and  an  unusually  talkative 
personal  computer). 

BANTAM  SOFTWARE; 
We  always  ask  what  turns 
people  on.  Now  we  want 
to  know  what  turns  you  on 
PERSONAL  COMPUTER: 
It's  about  time  someone 
asked  the  real  expert  What 
turns  me  off  is  boring 
software.  Boring,  uninvolv- 
ing,  predictable  software. 
And  cold  rooms.  Why  is  it 
always  so  cold  in  here? 
B:  Games  and  jAftoy 
magazines  called  Sherlock  Holmes 

in  "Another  Bow"  one 
of  the  year's  best. 
PC:  Let  me  decide. 
Okay?  (Disk  inserted.) 
Well,  this  is  anything 
but  elementary.  You're 
Holmes.  Watson's  at 
your  side.  And  you 
determine  your  own 
fate  in  case  after 
case.  And  look,  you 
run  into  the  likes  of 
Picasso,  Gertrude 
^erWry  Ford,  Louis 
'Armstrong.  Ana*-^  such  graphics!  These 
derive  from  eariy  20th  century  photographs. 
I  don't  have  a  clue  how  you  did  it,  but  you 
have  a  winner.  Next  case. 

B:  The  Fourth  Protocol,  from  Frederick 

Forsyth's  gigantic  best- 
selling  book.  Games  called 
it  "nerve-tingling."  Here 
you  go.  (Slides  disk  in.) 
PC:  You  mean  circuit- 
tingling.  If  1  knew  I  had 
to  save  the  worid, 
[  would  have  gotten 
more  sleep.  All  kidding 
aside,  this  im'olves 


nuc/earweapons.  A  British  traitor.  The  KGB. 
And  the  subversion  of  NATO.  This  is  a  chal- 
lenge. Will  it  help  if  1  read  the  book? 
(Loud  explosion  on  screen.) 
Oh  no !  Does  tliat  mean  I  lost? 
B:  No,  but  losing's  the  whole 
point  of  the  next  one.  The 
Complete  Scarsdale  Medical 
Diet.  You  know  the  bestseller. 
PC:  Why,  do  I  look  heavy? 
Never  mind,  let's  have  a  taste. 
(Disk  is  in- 
serted.) This  is 
some  menu.  It 
helps  you  assess 
your  goals. 
Monitor  your 
progress.  Mix  'n 
match  meals  from  all  five  Scarsdale 
diets.  Even  prepares  your  shopping  list.  It'll  tell 
you  how  much  exercise  you  need  to  work  off 
certain  foods.  Let's  see  about  kiwi  tart. . . 
B:  We've  got  one  other  program. 
PC:  No  more.  I'm  exhausted. 
B:  No... this  is  a  rebate 
program.  Just  fill  out  the 
coupon  and  mail  itwith 
proof  of  purcliase  and 
you  get  $5.00  back. 
PC:  Thank  you. 
That's  a  nice  offer. 
B:  So,  did  we  turn 
you  on? 

PC:  Yup.  Now,  please  turn  me  off  so 
I  can  rest  I've  got  to  do  some  running 
later  on  to  work  off  that  kiwi  tart. 

.S7l(Y/MA-Hi>/irn',-.n,iil;ihlelnr  :.^[ipti;//.Sprir5.  Coriliii()d<irt-6'l/l28, 
IRM  l'C;|T|l,  M.L.Hlt..sh 

ScvMblr  A/«Juvi/  Difi  available  for:  A|)plt'  //Series,  IBM  POPQr. 

The  Fntltflt  f^rottxjtl  .ivQJIable  for:  Commodorp  ^4/12*1  Available  syori  for 

Apple  //Series  and  IBM  POPCir. 
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^m^  Bantam  Software 
1 1!^. 'Special  Offer 


B  .^  \  T  A  M 
ELECTRO.NIC 
I'UBLLSHING 


nt.  or  their 
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Editor's  Notes 


As  is  usual  at  this  time  of  year,  we 
begin  to  think  about  what  the  new 
year  holds.  This  process  usually 
gets  up  to  speed  by  early  Decem- 
ber. That  happens  to  be  when  we're 
writing  this  particular  set  of  editor's 
notes.  It  also  means  you'll  be  read- 
ing them  in  February.  It  happens 
every  year  like  this,  but  what  can 
we  say?  We  simply  can't  get  too 
pseudo-visionary  in  October. 

Last  year  this  time,  we  were 
confidently  predicting  great  things 
to  conne  from  Commodore.  This 
year,  we're  predicting  great  things 
to  come  from  Commodore's  new 
Amiga  just  as  soon  as  it  begins  to 
ship  in  quantity  and  ....  You  get 
the  picture.  In  the  editorial  offices 
we  call  this  hedging.  It's  a  tech- 
nique we've  had  to  polish  up  on  the 
last  year  or  so.  There  was  a  time 
when  this  industry  just  grew  and 
grew.  In  fact,  it  grew  so  fast  that 
many  marketing  snafus,  many  less- 
than-polished  products,  were  never 
recognized  as  such.  Those  times 
have  passed.  We  no  longer  suspect 
that  perhaps  this  is  simply  a  pause 
in  the  phenomenal  growth  of  years 
past.  Times  have  truly  changed, 
and  our  markets  and  marketeers 
have  begun  to  adjust. 

We  won't  try  to  offer  any  de- 
tailed predictions  on  1986.  This 
year,  all  we  have  are  some  reflec- 
tions on  the  past,  and  a  few  on  what 
we  might  expect  from  months  ahead. 

IBM's  massive  advertising 
campaign  for  the  PCjr  has  been  im- 
pressive for  two  reasons.  It  presents 
an  opportunity  to  reap  a  reasonable 
savings  on  an  adequately  designed 
system,  and  it  presents  uninformed 
buyers  with  the  opportunity  to  pur- 
chase a  discontinued  computer  sys- 
tem six  or  more  months  after  the 
announcement  of  its  cessation.  IBM 
does  point  out  that  it  will  continue 
to  fully  service  and  support  the 
PCjr,  and  there's  certainly  no  re- 
quirement that  such  merchandise 


be  identified  as  no  longer  in  pro- 
duction. But  one  must  wonder 
whether  each  and  every  buyer  who 
responds  to  this  robust  advertising 
campaign  is  fully  aware  of  the  tran- 
sitory state  of  their  choice  of 
hardware. 

Has  Jack  Tramiel  done  it  again? 
This  headline  has  been  increasingly 
frequent  of  late,  in  part  we  suspect 
because,  in  this  rather  boring  down- 
turn in  the  industry,  Mr.  Tramiel  is 
reliably  eccentric.  We  have  saluted 
his  successes  several  times  over  the 
years,  and  do  so  again.  Regardless 
of  what  the  future  holds  for  Atari, 
he,  his  sons,  and  their  colleagues 
have  done  a  remarkable,  from  the 
bootstrings  up,  job. 

While  we're  on  the  subject  of 
phoenix  rising,  the  folks  Mr.  Tramiel 
left  behind  at  Commodore  haven't 
been  doing  so  badly  themselves. 
Recent  news  reports  indicate,  or  at 
least  express  hope  for,  a  profitable 
quarter  for  the  Christmas  season. 
That's  one  present  Commodore 
shareholders  haven't  seen  lately. 
This  upturn  is  projected  to  arrive  on 
the  extended  wings  of  the  128  and 
resurging  sales  of  the  64.  The 
Amiga  has  yet  to  begin  to  move  in 
quantity,  although  we  remain  con- 
fident that  it  will,  just  as  we're  sure 
that  more  and  more  software  devel- 
opers will  move  to  support  it. 

What  else  might  the  new  year 
hold  for  us?  Continuing  consolida- 
tion, we're  sure.  Both  corporate  ca- 
sualties and  corporate  successes. 
Everyone  has  become  much  more 
cautious  now,  so  the  flow  of  new 
materials  will  continue  to  diminish. 
Just  as  book  publishers  have  be- 
come more  selective  about  the  type 
and  quantity  of  titles  brought  to 
market,  so,  too,  are  the  software 
publishers  and  the  hardware  manu- 
facturers. Unfortunately,  we  can 
probably  expect  an  increasing 
sameness,  a  growing  presentation 
of  products  in  new  clothes.  As  the 


industry  matures,  we'll  see  the  cau- 
tion that  pervades  such  maturation 
begin  to  inhibit  previous  risk- 
taking,  so  we  suspect  that  we'll  see 
less  and  less  product  breadth,  and 
more  and  more  "me-too-ness"  in 
the  market.  Highly  successful  soft- 
ware will  beget  similar  programs 
more  rapidly.  Etc.  This  is  a  kind  of 
consolidation  that  markets  engage 
in  that  we're  not  entirely  comfort- 
able with,  but  we're  also  hopeful 
that  the  rapid  advances  on  the  pe- 
riphery of  our  technology  will  be 
sufficient  to  insure  continued  inno- 
vation. In  fact,  we  have  no  doubt  of 
it. 

A  belated  new  year  to  all  of 
you,  and  we  look  forward  to  a 
pleasant  1986. 

Robert  C.  Lock 
Founder/Editor  in  Chief 
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The  software  program 
you'll  play  with  alrtheJights  on. 


The  setting  is  a  quiet  New  England  town 
Or  (S  it?  Because  wlien  a  mysterious  mist 
descends  upon  it,  anytliing  can  happen. 

An  enormous,  bloodthirsty  dragonfly 
removes  heads  with  a  snap,  A  mutant 
centipede  attacks  with  razor-sharo  legs. 
A  giant  presence  paralyzes  with  the  shriek 
of  a  curfew  whistle  from  hell. 

This  could  only  be  Stephen  King's 
The  Mist'!'-''  Although  it's  based  on  the 
novella  of  the  same  name,  you  can't 
turn  to  the  last  page  in  this  frightening  text 
adventure  from  Mindscape:"' 

Your  commands  control  the  action.  Those  you 


confront  along  the  way  react  to  your  every  move. 
Journey  to  your  software  dealer  for 
Stephen  King's  The  Mist':''  And  while  you're 
there,  asl^  for  Mi ndscape's^"  other  new  text 
adventures:  James  Bond  007:  A  View  To  A 
Kill:"  Forbidden  Castle"-'  and  Voodoo  Island:'-' 
Each  one  is  delightfully  terrifying. 
Even  with  the  lights  on. 


bohware  tnai  cnaiienges  the  J 

All  ot  these  text  adventures  are  available  for  the  Apple"  II  series 
and  IBM  PC'  and  PCjr.  Stephen  King's  Ttie  Mis  t  and  James  Bond 
007:  A  View  To  A  Kill  are  also  available  tor  the  MaantoshV 


Mindscape,  Inc.  3444  Dundee  Road,  Northbrook.  Illinois 60062 1-800-221-9884.  (In  Illinois  1-800-942-7315) 

Apple.  Macintosh  and  IBM  are  reoi6!ered  Irademarhs  of  Apple  Comouler.  ( nc.  and  Imernatronal  Business  Machines.  Mtndscape  is  a  traoemark  of  Mindscape,  1  nc 
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IF  YOU  UM  FIND 

A  BEHER  PROGRAM 

WE'li  BUY  IT  FOR  YOU ! 


* 


WORD  WRITER  -^^l 

Now  w'rtfi  85,000  word  Spelling 
Checker 

•  An  efficient,  80-column  professional 
word  processing  system  which  includes 
a  spelling  checker  and  buiit-in 
calculator. 

•  Contains  all  the  features  you'll  need  for 
everyday  word  processing,  plus  most  of 
the  sophisticated  features  found  in 
more  expensive  programs:  document 
chaining,  form  letter  printout,  page 
separations,  horizontal  and  vertical 
scrolling,  and  more. 

WHh  Timewrorlcs  you  get  more 
power  for  your  dollar 

You  can  use  each  program  alone.  Or 
interface  this  trio  -  one  at  a  time  if  you  like 
-  into  a  completely  integrated  productivity 
system  that  delivers  all  the  power  and 
features  most  of  you  will  ever  need ...  at 
a  cost  that  lets  you  enjoy  their  use. 

Look  for  these  and  other  Timeworks  pro- 
grams at  your  favorite  dealer.  Or  contact 
Timeworks,  444  Lake  Cook  Road,  Deer- 
field,  IL  60015.  Phone:  (312)  948-9200. 


DATA  MANAGER  2 

Faster,  more  efficient,  more 
versatile 

•  A  complete  general  information  storage 
and  retneval  system  with  report-writing, 
graphics,  statistics,  and  label-making 
capabilities. 

•  Exclusive  X-SEARCH,  X-SORT.  and 
X-CHART  features  allow  you  to  cross- 
search  any  category  of  information:  sort 
items  alphabetically  numerically  or  by 
date;  break  down  statistical  rnformation 
into  categories:  and  graphically  view 
your  results. 

WHh  Timeworks  you  get  more 
than  software 

You  Get  Our  Customer  Technical 
Support  Team 

At  the  other  end  of  our  loll-free  hotline, 
you'll  find  our  lull-time  Customer  Techni- 
cal Support  Team.  Free  of  charge  to  all 
registered  users. 

You  Get  Our  Liberal  Trade-Up  Policy 

You'll  find  (he  details  inside  each  package. 


SWIFTCALC  ^'^  SIDEWAYS 

New  easy-to-use  spreadsheet 
for  home  and  small  business  use 

•  The  SIDEWAYS  option  lets  you  print 
all  your  columns  on  one,  continuous 
sheet . . .  sideways. 

•  250  rows  and  upto  250  columns  (128K 
version)  provide  up  to  62,500  cells 
(locations  on  the  spreadsheet)  in  which 
to  place  iniormation. 

•  Performs  mathematical  functions  up  to 
17  digits.  Allows  the  use  of  minimum 
and  maximum  values,  averages,  sums, 
integers,  absolute  values  and  exponen- 
tial notation. 

*With  Timeworks  you  get  our 
Money  Back  Guarantee 

If  you  can  find  anything  that  works  better 
for  you,  simply  send  us  your  Timeworks 
program,  your  paid  receipt,  and  the  name 
of  the  program  you  want,  along  with  your 
check  or  credit  card  number  for  any  retail 
price  difference.  If  it's  available,  we'll 
buy  it  for  you." 

For  Apple,  IBM, 
Commodore  128  (128K) 
&  Commodore  64 
Computers 


More  power  for  your  dollar. 

"  Offer  valid  lor  90  days  from  (Jate  oi  pufcTisse 

■■*  Regslered  Itarierrafks  of  Appfe  Compufer.  IfK-.  fnfetr^tional  Business  Machines  Corporation,  anrj 
Comrnodore  Ckimputer  Sy&terris 
t  I9a5  Tin»VTO*5.  Inc.  Alt  nghls  resfirverj 


Other  Timeworks  Programs: 
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Readers  Feedback 


The  Editors  ond  Readers  of  COMPUTE! 


//  you  have  any  questions,  commenls,  or 
suggestions  you  would  like  to  see  ad- 
dressed in  this  column,  write  to  "Readers' 
Feedback,"  compute;,  P.O.  Box  5406, 
Greensboro,  NC  27403.  Due  to  the  volume 
of  mail  we  receive,  we  regret  that  we 
cannot  provide  personal  answers  to  tech- 
nical questions. 


Can  A  Worm  Have  Artificial 
Intelligence? 

Some  time  ago  I  read  a  description  of 
"core  war"  games  and  their  variations 
[Scientific  American,  March  1985).  The 
game  consists  of  two  short  programs 
placed  in  a  memory  area  that  loops 
around  at  the  end.  A  special  operating 
system  runs  the  two  battling  programs 
by  alternately  performing  one  instruc- 
tion from  each;  and  the  two  programs 
attack  and  try  to  write  over  one  anoth- 
er, while  trying  to  avoid  attacks  and 
repairing  themselves.  Also  mentioned 
was  a  "worm"  program  that  replicates 
itself  in  a  journey  through  the  comput- 
er's memory.  I  am  very  interested  in 
such  programs  and  would  like  to  see  a 
self-replicating  program  for  the  Com- 
modore 64. 

Charles  Wiliett 

Like  other  eight-bit  computers,  the  64 
isn't  very  well  suited  for  conducting  pro- 
gram wars.  Most  such  games  run  on  main- 
frame systems  which  are  capable  of 
multitasking— running  several  programs 
at  once.  Of  the  currently  available  person- 
al computers,  only  the  Commodore  Amiga 
is  designed  for  multitasking.  It  would  re- 
quire quite  an  elaborate  machine  lan- 
guage program  to  emulate  even  a  simple 
form  of  multitasking  on  the  64.  The  battle 
programs  must  be  written  in  machine  lan- 
guage as  well. 

Hoivever,  a  "worm"  program  is  quite 
easy  to  write.  Following  are  two  short 
examples  for  the  64  that  reproduce  them- 
selves as  they  move  upward  in  memory. 
By  the  time  they're  done,  all  of  the  space 
they've  traveled  through  is  filled  with 
discarded  copies  of  themselves — it's  a  bit 
like  a  snake  shedding  its  skin. 

The  first  version  creates  and  acti- 
vates an  ML  routine  that  begins  at  loca- 
tion 3000:  It  displays  its  current  starting 
address  as  it  goes,  ending  with  a  lockup 


when  it  hits  the  64's  BASIC  ROM  at 
location  40960  (turn  the  computer  off  and 
on  to  regain  control): 

10  j=3000 

20  READ  X:IF  X<>256  THEN  GK=CK 

+X:POKE  J,X:J=J+1:GOTO20 
30  IF  CK0  9834  THEN  PRINT  "ERRO 

R  IN  DATA  STATEMENTS — CHECK 
TYPING ": END 
40  SYS  3000 
50  DATA  169,200,133,251,169,11 

,133,252,169,247,133 
60  DATA  253,169,11,133,254,160 

,47,177,251,145,253 
70  DATA  136,16,249,24,165,251, 

105,47,133,251,165 
80  DATA  252,105,0,133,252,24,1 

65,253,105,47,133 
90  DATA  253,165,254,105,0,133, 

254,166,251,165,252 
100  DATA  32,205,189,169,13,32, 
210,255,256 

The  second  version  is  written  entire- 
ly in  BASIC,  but  does  essentially  the  same 
thing.  It  repeatedly  copies  itself  to  a  new 
memory  area  and  then  runs  the  copy, 
printing  its  beginning  and  ending  ad- 
dresses before  each  move. 

10  CLR!J=0:EA=0:SA=0!HB=0:LB=0 

:LN=0:HN=0 
20  SA=PEEK(43)+2  56*PEEK(44) :PR 

INT  CHR5( 147) "WORM  CODE  STA 

RTS  AT  ";SA 
30  EAsPEEK(49)+256*PEEK(50) sPR 

INT  "AND  ENDS  AT  ";Eh 
40  FOR  J=0  TO  (EA-SA):POKE  ( EA 

+J ) , PEEK ( SA+J ) : NEXT 
50  HN=INT(EA/2  56) :LN=EA-(256*H 

N) 
60  HB=INT( (EA+(EA-SA) )/256) sLB 

=(EA+(EA-SA) )-(256*HB) 
70  PRINT  CHR?( 147) "POKE  "EA",0 

80  PRINT  CHR?(i7)CHRS(17)"POKE 

43,  ■'LN":P0KE44,  "HN 
90  PRINT  CHR5(17)CHR5(17) "POKE 

45, "LB":POKE46, "HB 
100  PRINT  CHR$(17)CHR$(17) "SYS 

42291" 
110  PRINT  CHR?(17)CHR${17)"RUN 

120  POKE  198,6:P0KE  631,19:FOR 
J=0  TO  6:P0KE  632+J,13!NE 
XT 

Locations  43-44  and  49-50  point  to 
the  beginning  of  program  text  and  the  end 
of  simple  variable  storage,  respectively. 
Line  40  does  the  actual  duplication,  copy- 
ing everything  between  the  starting  and 
ending  points  into  the  addresses  just 
above  the  end  of  the  current  program. 


Once  that's  done,  the  worm  executes  a 
series  of  direct  mode  commands  with  the 
dynamic  keyboard  technique  to  set  the 
start-of-program  and  end-of-variables 
pointers  at  the  right  positions  for  the  new 
copy.  SYS  42291  relinks  the  program  lines 
so  they'll  run  properly  in  their  neiv  loca- 
tion. The  BASIC  worm  stops  with  an  OUT 
OF  MEMORY  message  when  it  travels  so 
high  that  there's  not  enough  RAM  left  to 
hold  its  variables  (your  BASIC  program 
space  is  almost  nil  at  this  point;  type  SYS 
64738  to  reset  the  computer).  With  some 
modifications,  these  programs  will  run  on 
other  Commodore  computers  as  ivell. 

Of  course,  the  results  here  are  trivial. 
But  exercises  like  these  can  form  the  basis 
of  artificial  intelligence  experiments. 
(Dnce  you  begin  to  view  a  program  as  a 
"being,"  all  sorts  of  intriguing  questions 
arise:  What  properties  in  addition  to 
movement  and  self-replication  character- 
ize a  living  entity?  How  can  a  computer 
emulate  those  actions?  What  is  intelli- 
gence? We're  only  beginning  to  see  the 
fruits  of  these  inquiries  in  such  applica- 
tions as  expert  systems  and  speech  recog- 
nition. 

Controlling  IBM's  NUM  LOCK 

I'm  trying  to  read  the  IBM  PC's  cursor 
keys  from  within  a  BASICA  program. 
But  if  the  NUM  LOCK  key  is  set  in  the 
wrong  mode,  the  numeric  keypad  gen- 
erates number  codes  instead  of  cursor 
codes.  How  can  1  set  NUM  LOCK  un- 
der program  control? 

Dennis  Heckman 

When  you  first  boot  up  an  IBM  PC,  the 
numeric  keypad  keys  act  as  cursor  keys. 
Pressing  NUM  LOCK  makes  the  computer 
read  them  as  numeric  keys.  Memory  loca- 
tion 1047  controls  the  status  of  NUM 
LOCK  as  well  as  several  other  special 
keys.  Each  bit  of  this  location  serves  a 
different  purpose: 
Bit       Key 

7  INSERT 

6  CAPS  LOCK 

5  NUM  LOCK 

4  SCROLL  LOCK 

3  ALT 

2  CTRL 

1  Left  SHIFT 

0  Right  SHIFT 

In  each  case,  a  1  in  the  bit  position 
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From  Origin  comes  the  long-awaited  sequel 

—      "  to  the  award-winning 

)  Ultima™  III 


Quest  of  the 
/watar 

A  state-of-the-art  fantasy  role- 
playing  game  of  unprecedented 
magnitude  by  Lord  British"". 


Available  on  Apple,    Commodore    64 


repare  yourself  for  a  grand 
adventure:  Ultima™  IV, 
sixteen  times  larger  than 
_        Ultima  III,  is  a  milestone  in 
computer  gaming— one  that  challenges 
your  physical  and  mental  skills  while 
testing  the  true  fabric  of  your  character.       '';;^ 

Enter  Britannia,  kingdom  of  Lord  *  7 

British.  Journey  through  terrain  of  infinite    ^- 
proportions,  conversing  with  characters 
on  hundreds  of  topics.  Unravel  the 
mysteries  of  a  superior  magic  system.  At  each  turn  beware  of  daemons,  dragons  and 
long-dead  wizards  haunting  the  most  tranquil  of  places.  Encounters  with  parties  of 
mixed  enemy  types  tesf  your  strategic  abilities.  Shrewd  use  of  terrain  can  lead  to 
victory  against  seemingly  impossible  odds.       " 

Survive  this  muhi-quest  fantasy,  then  begin  the  final  conflict,  your  quest  of  the 
Avatar.  The  ultimate  challenge —the  self—  awaits. ... 

isvsTEm  WC.  /  340  HARVEY  ROAD,  MANCHESTER,  NH  03103  (603)  644-3360 


ULTIMA™  III  sends  you  on 
an  incredible  fantasy  role- 
playing  journey  through 
monster-plagued  Sosaria  in 
search  of  the  elusive 
Exodus. 


MOEBIUS'"  takes  you 
through  the  elemental 
planes  of  a  colorful  Orien- 
tal world  of  fantasy  and 
adventure  in  search  of  the 
Orb  of  Celestial  Harmony. 


AUTODUEL™  is  a  fijturistic. 
fast-paced  strategy  role- 
playing  game  where  the 
right  of  way  goes  to  the 
biggest  guns. 


OGRE™  is  a  strategy  game 
fought  on  the  nuclear  bat- 
tlefield of  tomorrow  as  an 
inhuman  juggernaut  Cyber- 
tank  battles  conventional 
forces. 


Ullima  and  Loid  British  are  trademarks  of  Richard  Garriolt/Moebius  is  a  trademark  af  Greg  Malone/AuloDue]  and  Ogre  are 
trademarks  ot  Steue  Jackson/ Apple  is  a  trademark  of  Apple  Compuler  inc/Cominodore  a  trademark  of  Commodore  Business  Machines 


Authors  wanted. 
Call  u>  today. 


shoius  that  the  corresponding  key  is 
pressed,  and  a  0  indicates  that  it's  not 
pressed.  Thus,  after  NUM  LOCK  has  been 
pressed  (when  the  keypad  keys  act  like 
number  keys),  bit  5  of  location  3047  con- 
tai7is  a  1.  When  NUM  LOCK  is  not  in 
effect  (when  the  keypad  keys  act  like  cur- 
sor keys),  bit  5  contains  a  0.  To  change  the 
NUM  LOCK  status  from  within  a  pro- 
gram, all  you  need  to  do  is  put  a  1  or  0  in 
bit  5  of  location  1047.  In  most  cases  you'U 
want  to  leave  the  rest  of  the  keyboard  in 
its  current  configuration;  thus,  it's  prefer- 
able to  PEEK  the  current  value  of  1047, 
AND  that  value  with  223  (to  set  bit  5  to  0), 
and  POKE  the  resulting  value  back  into 
1047.  Put  the' following  statement  at  the 
beginning  of  your  program  to  perform  the 
entire  operation: 

10  DEF  SEG=0:POKE  1047,  PEEK(1047) 
AND  223 

After  the  computer  executes  line  10, 

the  keypad  keys  work  as  cursor  keys.  If  you 
need  to  reverse  the  NUM  LOCK  status, 
use  the  following  statement  to  set  bit  5  of 
location  1047  to  1: 

DEF  SEG  =  0:POKE  1047,  PEEK(1047)  OR 
32 

Of  course,  even  after  you've  set  the 
NUM  lOCK  status,  the  user  can  still 
change  it  back  by  hittitig  NUM  LOCK.  To 
be  safe,  you  might  want  to  set  the  status 
immediately  before  every  operation  re- 
quiring the  keys. 

Similar  statements  can  be  used  to 
affect  the  other  keyboard  features  con- 
trolled by  location  1047.  For  instance, 
POKE  1047,  PEEK(1047)  AND  191  turns 
off  CAPS  LOCK,  and  POKE  1047,  PEEK 
(1047)  OR  64  turns  it  on. 

Amiga  Features 

1  can't  wait  to  purchase  an  Amiga,  but  I 
need  to  know  a  few  things.  First  w'ill 
your  magazine  support  the  Amiga  (pro- 
grams, columns,  etc.)?  Secondly,  refer- 
ring to  your  article  about  the  Amiga's 
IBM  compatibility  ("Amiga  Goes  IBM- 
Compatible,"  October  1985),  can  the 
Amiga  handle  IBM  PC  software  that 
must  be  booted  on  a  PC?  Thirdly,  can 
the  Amiga  do  Macintosh-type  graphics 
and  text  fonts? 

Victor  Swindell 

COMPUTE!  !s  supporting  the  A?7iiga  zvith 
product  reviexvs  and  tutorials,  and  will 
add  programs  lohen  the  final  version  of 
BASIC  is  released.  The  first  Amigas  were 
being  shipped  last  fall  with  ABasiC,  a 
BASIC  interpreter  written  by  Meta- 
ComCo,  the  British  company  which  also 
wrote  AmigaDOS.  However,  Commodore 
was  making  final  preparations  in  Novem- 
ber to  ship  an  entirely  different  BASIC 
written  by  Microsoft.  This  BASIC  report- 
edly was  adapted  from  Microsoft  BASIC 
for  the  Macintosh  and  has  many  more 


features  than  ABasiC.  The  latest  tvord 
we've  received  is  that  Microsoft  BASIC  is 
to  replace  ABasiC  as  the  standard  lan- 
guage shipped  with  the  Amiga. 

The  IBM  PC  emulator  software— 
now  known  as  the  Transformer — also 
was  not  available  at  this  writing  (early 
November),  but  de?nonstrations  ofprepro- 
duction  versions  show  that  it  is  capable  of 
booting  PC  software  directly  off  SV-s-incft 
IBM  disks.  (External  5Vi-inch  disk  drives 
for  the  Amiga  are  optional.)  Early  reports 
indicate  that  an  Amiga  with  the  Trans- 
former is  not  100  percent  IBM-compatible, 
but  that  it  can  run  most  of  the  best-selling 
PC  software  with  a  slight  sacrifice  of 
speed.  Conwiodore  is  also  ivorking  on  an 
accelerator  package  that  zoill  improve  the 
Transformer's  performance.  We'll  report 
on  the  Transformer's  degree  of  IBM  com- 
patibility and  its  speed  xvhen  it  becomes 
available. 

The  Amiga  displays  Macintosh-style 
graphics  with  its  operating  system  inter- 
face, the  Workbench,  which  resembles  the 
Macintosh  desktop.  This  screen  mode  has 
640  X  200  resolution  (128,000  pixels),  less 
than  the  Mac's  512  X  384  resolution 
(196,608  pixels).  However,  the  Amiga 
screen  is  in  color.  The  Amiga  also  has  a 
high-resolution  mode  with  640  X  400 
resolution  (256,000  pixels),  but  the  Work- 
bench doesn't  work  in  that  mode.  A  couple 
of  graphics-drawing  programs  which  are 
beitig  released  for  the  Amiga  are  sitnilar  to 
MacPaint,  except  they  take  advantage  of 
the  Amiga's  palette  of  4,096  colors.  The 
Amiga  also  has  various  text  fonts  avail- 
able like  the  Macintosh.  You  can  try  out 
some  of  these  fonts  by  opening  the  Note- 
pad from  the  Utilities  drawer  on  the 
Workbench  disk,  then  pulling  down  the 
Font  and  Style  menus.  There  are  several 
different  fonts,  type  sizes,  and  styles. 

Secret  Apple  Self-Test 

While  using  my  Apple  lie,  I  discovered 
something  rather  odd.  I  pressed 
CONTROL-RESET  at  the  same  time 
that  1  was  unknowingly  pressing  one  of 
the  joystick  buttons.  First  the  screen 
vvent  blank,  then  it  filled  up  with  color- 
ful, constantly  changing  hi-res  graphics 
patterns.  1  know  this  had  nothing  to  do 
with  the  program  1  was  using.  What 
happened? 

Sam  Robison 

On  the  Apple  lie  and  Ik,  pressing  a 
joystick  button  performs  the  same  action 
as  pressing  the  Open-Apple  and  Closed- 
Apple  keys  on  the  keyboard.  Pressing  RE- 
SET while  holding  down  both  CONTROL 
and  the  Open-Apple  key  forces  the  com- 
puter to  reboot,  just  as  if  the  power  switch 
had  been  turned  on. 

Sotnething  different  happens  on  the 
He  if  you  also  hold  down  the  Closed- 
Apple  key  along  with  the  other  three  (it 


takes  a  bit  of  practice  to  reach  all  four  at 
once).  The  computer  performs  a  self-test  of 
its  circuitry,  which  takes  about  20  sec- 
onds. While  this  is  happening,  a  changing 
lo-res  pattern  fills  the  screen.  If  all  is  well, 
the  screen  clears  and  the  message  "System 
OK"  appears.  If  any  other  message  shows 
up,  you  should  have  your  computer 
checked  by  a  technician. 

The  Apple  Ik  does  not  have  a  built- 
in  diagnostic  program.  According  to  the 
Apple  lie  Reference  Manual,  pressing 
the  same  cluster  of  four  keys  activates 
"Teri's  Memory  and  Soft  Szvitch  Exercise 
Program,"  which  generates  the  hi-res  dis- 
play that  you  saw.  The  program  runs  for  a 
few  minutes,  eventually  locking  up  the 
system  (no  harm  is  done — simply  reboot 
as  usual).  In  the  Reference  Manual,  Ap- 
ple claims  that  this  program  is  used  only 
during  manufacture  and  has  no  use  after 
that  point.  By  accessing  RAM  and  the 
display  circuitry,  it  may  generate  signals 
that  Apple's  test  equipment  can  recognize. 
It's  also  quite  pretty  to  watch. 


Commodore  Boot  Programs 

[  have  a  PCjr  and  my  boss  recently 
purchased  a  Commodore  64  (his  first 
computer).  I  would  like  to  know  how  to 
write  the  equivalent  of  an  IBM  AUTO- 
EXEC.BAT file  for  the  64  so  my  boss 
can  load  and  activate  certain  programs 
(such  as  "TurboDisk"  and  the  DOS 
Wedge)  automatically,  without  having 
to  type  anything.  Can  this  be  done 
without  installing  a  special  ROM  chip? 
Steve  Neeland 

While  an  autoboot  feature  of  this  type  is 
common  in  ynost  computer  systems,  it  is 
not  built  into  the  Commodore  64.  Hoiv- 
ever,  it  is  possible  to  create  a  disk  file  that 
loads  and  runs  automatically  when  you 
type  L0AD"*",8,1  and  press  RETURN. 
Though  it's  too  long  to  include  here, 
there's  a  program  called  "Autoload"  in 
COMPUTEl's  Third  Book  of  Commo- 
dore 64  zvhich  creates  such  files  for  you. 
If  you  don't  mind  tiuo  extra  key- 
strokes, you  can  load  and  run  any  BASIC 
program  from  disk  with  a  single  com- 
mand. Type  the  follozving,  replacing 
FILENAME  luith  the  name  of  the  BASIC 
program  you  ivant  to  run: 

LOAD"FILENAME",8: 

Don't  forget  the  colon  after  the  8. 
With  the  cursor  positioned  in  the  space 
fotloiuing  the  colon,  press  SHIFT-RUN/ 
STOP.  The  64  prints  LOAD  after  the  colon 
and  proceeds  to  load  and  run  the  program. 
(On  the  Commodore  128,  you  can  achieve 
the  same  effect  zvith  RUN  "FILENAME".) 
It's  also  relatively  easy  to  load  and  acti- 
vate a  series  of  machine  language  pro- 
grams from  BASIC,  provided  they  return 
to  BASIC  and  don't  perform  a  NEW  when 
they  set  up.  Here's  a  short  program  thai 
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You  know  Temple  of  Apshai. 

The  classic.  Best-seller  for  over 
four  years. 

You  may  have  friends  trapped  forever 
in  its  dark  recesses. 

Players  have  dropped  from  sight  for 
weeks  at  a  time,  searching  for  the 
treasures  of  Apshai. 

Well  now  we've  raised  the  stakes. 

Introducing  the  new  Apshai  Trilogy. 
The  combined  \^rzAh  of  the  world 
famous  Temple  of  Apshai®,  Upper 
Reaches  of  Apshai®,  and  Curse  of  Ra®. 
All  on  a  single  disk.  Twelve  levels. 
568  rooms  to  explore.  More  choices. 
More  chances.  Best  of  all.  there's  faster 
game  play. 


The  graphics  and  sounds  are  new.  The 
challenge  of  the  dungeons  is  timeless. 

Are  you  ready  for  the  most  involving 
role-playing  game  ever  designed? 

Temple  of  Apshai  is  waiting.  Silently 
lurking.  Patiently  waiting.  For  you.  At 
your  nearest  Epyx  dealer. 


'fW-c  ipif  i^l>-  m^kifd  hiru-.s  br  drcLaiJ!.  "So 
pure)  I  AW  ni»e&ur>.  SMV(-[nLlk■^s  i-nds 
December  31.  19S5.  (IffitiiJ  rul«  i^xXMe 
U  pdriicipoting  r^Uiien.  T-^trU  available 
while  supplies  1^. 


1043  Kiel  Court,  Sunnyvale.  CA  94089 

Strategy  Games  for  the  Action-Game  Player 


loads  the  two  utilities  you  mentioned.  Be 
sure  to  save  the  program  before  you  run  it, 
since  it  performs  NEW  after  installing 
"TurboDisk"  and  the  DOS  Wedge: 

10  REM  THIS  PROGRAM  ERASES 

ITSELF-SAVE  BEFORE  YOU  RUN 
20  IF  Z  =  2  THEN  60 
30  IF  Z  =  l  THEN  50 
40  Z=l:LOAD"DOS  5,1",8,1 
50  Z  =  2:LOAD"TURBODISK.OBJ",8,1 
60  SYS  49152;SYS  52224:NEW 

Along  with  many  other  new  features, 
the  Commodore  128  has  the  ability  to 
perform  a  true  autoboot.  When  you  turn  it 
on,  the  128  searches  track  1,  sector  0  of  the 
disk  in  the  drive  for  a  special  "signature" 
code  consisting  of  the  characters  CBM,  If 
that  code  is  present,  the  system  loads  and 
runs  the  program  specified  in  the  autoboot 
sector.  Since  the  autoboot  program  can  in 
turn  load  and  run  a  larger  boot  program, 
it's  possible  to  create  quite  an  elaborate 
boot  sequence,  which  loads  and  activates 
your  favorite  utilities  and  otherwise  con- 
figures the  system  exactly  to  your  Uktng. 
Autobooting  works  ivith  the  1541  disk 
drive  (even  for  CP/M  disks)  as  well  as  the 
newer  1571.  COMPUTEI's  Commodore 
128  Programmer's  Guide  contains  a  de- 
tailed discussion  of  the  autoboot  process 
as  well  as  a  program  that  creates  auto- 
booting disks  for  the  128. 

More  Tl  Supplies 

Sorry  that  we  weren't  able  to  be  includ- 
ed in  your  September  1985  list  in  this 
column  of  Texas  Instruments  suppliers. 
We're  a  small  business  and  work  direct- 
ly with  various  distributors  across  the 
country.  Rather  than  stock  items,  we 
place  orders  with  our  distributors  ac- 
cording to  our  customers'  needs.  We 
offer  a  delivery  time  of  two  weeks  in 
most  cases. 

Mary  Ann  fiolzer 

Creative  Ideas 

7062  South  Tamarac  Street 

Englewood,  CO  80112 

Please  include  us  on  your  list  of  compa- 
nies that  support  the  TI-99/4A  com- 
puter. We  have  been  in  business  since 
1982  and  provide  software,  hardware, 
and  peripherals  for  the  TI-99/4A  as 
well  as  other  computers. 

Bob  Polizzotto 

Multi  Video  Services 

P.O.  Box  246 

East  Amherst,  NY  14051 

Thank  you  for  the  information. 

Custom  Cursors  For  64 
SpeedScript 

Even  though  I  have  used  more  elabo- 
rate word  processors  with  my  Commo- 
dore 64,  1  frequently  prefer  to  use 
SpeedScript  because  of  its  speed  and 
convenience.  However,  1  find  the  inces- 


santly blinking  cursor  a  distraction.  Can 
you  tell  me  how  to  get  rid  of  it? 

Paul  Newsom 

fust  as  everyone  seems  to  prefer  different 
screen  colors,  some  people  like  a  blinking 
cursor  while  others  find  it  maddening. 
Fortunately,  it's  easy  to  stop  the  blink  or 
change  its  speed.  Of  course,  you  wouldn't 
want  to  eliminate  the  cursor  altogether, 
since  that  ivould  make  it  hard  to  find  your 
way  around  inside  a  document.  To  defeat 
the  blink,  load  SpeedScript  info  memory, 
type  one  of  the  following  lines  in  direct 
mode  (without  a  line  number),  and  press 
RETURN.  Be  sure  to  use  the  correct 
POKEs  for  the  version  of  Speedscript 
you're  using,  and  type  very  carefully — 
even  a  small  error  may  have  drastic 
consequences: 

SpeedScript  2.0 

POKE  2527,240:POKE  2528,246 

SpeedScript  3.0  or  3.1  (Commodore  64 

only) 

POKE  2698,240;POKE  2699,246 

Resave  SpeedScript  under  a  new 
filename  to  distinguish  this  version  from 
the  original.  Now  the  reverse  video  cursor 
remains  steady  rather  than  blinking.  Since 
SpeedScript  blinks  the  cursor  only  during 
idle  times  (ichen  you're  not  pressifig  any 
keys),  this  has  no  effect  on  the  rest  of  the 
program.  To  restore  the  blink,  enter  one  of 
these  lines: 

SpeedScript  2.0 

POKE  2527,1 65;POKE  2528,162 

SpeedScript  3.0  or  3.1 

POKE  2698,165:POKE  2699,162 

Changing  the  cursor's  blink  speed  is 
even  easier.  To  make  the  cursor  blink  at 
half  its  normal  rate,  enter  POKE  2530,32 
fSpeedScript  2.0;  or  POKE  2701,32 
(SpeedScript  3.0  or  3.1J.  To  make  the 
cursor  blink  in  double-time,  POKE  the 
same  location  with  8  instead  of  32.  De- 
pending on  your  preferences,  you  may 
find  one  of  these  preferable  to  the  default 
speed.  POKE  the  same  location  with  16  to 
restore  the  tiormal  blink  rate.  Because  the 
blink  IS  created  by  replacing  the  character 
under  the  cursor  with  its  reverse  video 
equivalent,  there's  no  way  to  change  the 
cursor's  actual  appearance  without  graft- 
ing a  complete  set  of  custom  characters 
onto  SpeedScript  as  well.  (Sec  "Commo- 
dore 64  SpeedScript  Fontmaker,"  com- 
pute!, January  1986.) 

Improving  Atari  CLOADs 

I  would  like  to  respond  to  James  Jen- 
kins' letter  in  the  October  1984  issue  of 
COMPUTE!  about  Atari  CLOAD  errors 
138  and  143.  Here  are  a  few  sugges- 
tions: 

When  purchasing  blank  cassettes, 
buy  only  those  whose  cases  are  held 
together  with  five  screws.  Tape  errors 


are  caused  not  so  much  by  the  quality 
of  the  tape  as  by  the  quality  of  the  case. 
The  Atari  Program  Recorders  seem 
very  susceptible  to  minor  tape  fluctua- 
tions caused  by  the  tape  binding  in  the 
case.  Second,  after  using  a  tape  for 
some  time,  it  may  become  unevenly 
wound,  causing  it  to  bind  and  generate 
errors.  To  free  the  tape,  slap  it  on  the 
flat  side  of  the  cassette  against  a  hard 
surface.  This  forces  the  tape  against  one 
side  of  the  case  and  reduces  errors. 
Finally,  instead  of  pressing  SYSTEM 
RESET  to  clear  the  screen,  type  GR.O  or 
press  SHIFT-CLEAR.  SYSTEM  RESET 
can  disrupt  operation  of  the  POKEY 
chip,  which  controls  input/output  op- 
erations. Thus,  pressing  SYSTEM  RE- 
SET before  you  do  a  CSAVE  or  CLOAD 
can  cause  tape  errors.  To  recover  from 
this  situation,  type  LPRINT  and  press 
RETURN  while  your  printer  (if  you 
have  one)  is  offline  or  switched  off. 
You'll  see  an  ERROR  138,  but  this  sim- 
ply means  the  printer  is  not  responding. 
This  resets  the  POKEY  chip  and  allows 
error-free  tape  operations, 

Richard  L.  Baldwin 
Thanks  for  the  advice.  In  a  related  letter, 
reader  W.  Byrom  Dorsey  points  out  that 
you  can  get  similar  information  free  of 
charge  from  Atari,  1265  Borregas  Avenue, 
Sunnyvale,  CA  94086.  Just  ask  for  the 
bulletin  entitled  "410  Tech  Tips." 


Atari  Keyboard  Buzzer 

When  I  type  107  characters  on  my  Atari 
800XL,  the  computer  sounds  a  buzzer. 
Is  this  a  Revision  B  operating  system 
bug,  or  does  Atari  have  a  purpose  for  it? 
John  Lapetina 

The  buzzer  effect  is  a  deliberate  design 
feature,  not  a  bug.  It  happens  in  BASIC 
with  all  Atari  400/800,  XL,  and  XE  com- 
puters with  all  versions  of  the  operating 
system.  (Incidentally,  your  800XL  has  the 
XL  operating  system,  not  Revision  B.  Re- 
vision B  fixed  some  bugs  in  the  original 
Revision  A  operating  system  shipped  with 
early  400s  and  800s.  It  is  available  for  XL 
and  XE  computers  on  the  Atari  Translaior 
disk.) 

The  buzzer  is  analogous  to  the  end-, 
of-line  bell  on  a  typewriter:  It  warns  when 
you  are  reaching  the  end  of  a  BASIC 
logical  line.  A  logical  line  is  the  maxi- 
mum number  of  characters  that  can  be 
typed  after  a  line  number.  On  the  Atari,  a 
logical  line  may  be  as  long  as  three  physi- 
cal lines  (screen  lines).  If  a  BASIC  state- 
ment (or  series  of  statements  separated  by 
colons)  won't  fit  on  a  logical  line,  you 
must  either  shorten  it  or  break  it  up  into 
two  logical  lines. 

The  actual  number  of  characters  al- 
lowed in  a  logical  line  varies  according  to 
how  the  screen  margins  are  set.  Atari 
BASIC  normally  defaults  to  a  38-column 
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WINTER  games:     ^ 
UEST  f OR  THE  GOLD  C0N11NUES... 


You've  captured  the  gold  in  Summer 
Games®  and  Summer  Games  11™.  Now 
its  on  to  the  Winter  Games]  And  what 
an  incredible  setting— a  completely 
realistic  winter  wonderland  featuring 
seven  action-packed  events. 

At  the  Ski  Jump  you  control  your 
form  in  mid-air,  knees  straight,  leaning 
forward.  Hot  Dog  Aerials  challenges 
your  courage  and  your  sense  of  humor. 
In  Figure  Skating  you  leap  into  Double 
and  Triple  Lutz  jumps— wow  the  crowd 
with  a  perfect  Camel  into  a  Sit  Spin. 
It's  timing  and  style  that  counts.  Free 
Skating  lets  you  choreograph  your  own 
routines.  In  Speed  Skating  it's  you 
against  a  fellow  speed  demon- the 
fastest  human  beings  on  level  earth! 
And  the  Bobsled— still  faster  as  you  fly 
around  hairpin  turns,  leaning  hard  to 
stay  in  the  tube.  Finally  the  Biathlon, 
the  ultimate  challenge  to  your  endur- 
ance In  cross-country  skiing  and 
marksmanship. 

All  of  this  fun  and  excitement  is 
easy  to  learn  and  play.  You  control  the 


action  with  the  joystick,  animating  your 
player  for  style  and  rhythm.  You  choose 
the  country  you  want  to  represent. 
Listen  to  its  national  anthem.  Then  it's 
practice,  training  and  learning  a  win- 
ning strategy  for  each  event.  Now  the 
Opening  Ceremony  and  the  competi- 
tion begins— against  your  friends  or 
the  computer.  Will  you  be  the  one  who 
takes  the  gold  at  the  Awards  Ceremony! 
Will  your  name  be  etched  amongst  the 
World  Record  holders? 

The  quest  for  the  gold  continues... 
And  it's  all  here— the  strategy,  the 
challenge,  the  competition,  and 
pageantry  of  Winter  Games! 

ftPPU  MAC         C64/128 

Winter  Games  v*  t^  >^ 


'  Set  specialty  mari«iJb<i^«(ur<ii;tab. 
cr«i>  Ito.  31.  I9M  IXtcul  nilo 


compurEK  somvARE 


1043  Kiel  Ct.,  Sunnyvale,  CA  94089 

Strategy  Games  for  the  Action-Gatne  Player 


IS  IT  POSSIBLE  TO  MAKE  THE  BEST  ANY  BETTER?! 


The  MW-350  is  getting  better 
with  age  because  of  these  new 
additions: 

•  Standard  4K  Buffer 

•  Special  Software  Modes 

•  Supports  more  printers 

•  ••••••• 

•  Optional  Transparent  Mode 
External  switch  selectable  Commodore 
graphics  mode  tor  Epson,  Star  Micronics, 
C.  Iloh  Prowriter,  Okldata.  Selkostia. 
Banana,  BWC,  Panasonic,  Mannesman- 
Talley,  Think  Jet  &  others. 

1.00 


And  it  still  lias: 

•  Buill-m  Self  Test  with  Status  Report 

•  Microprocessor  conirolled  emulation  of 
Commodore  printers  for  compatability 
with  popular  software 

NEW  INTRODUCTORY  SALE! 
PRICE  


$89.1 


OR    $79,00  with  trade  in  of  your  old  interface 


Universal  Input/Output 
Board  for  C-64&C- 128 

•  16  Channel  8-bit  A/D  converter  with  100 
microsecond  sampling  time 

•  1  D/A  output 

•  16  high  voltage/high  current 
discrete  output 

•  1  EPROM  socket 

•  Use  multiple  boards  for  additional 
channels  up  to  6  boards 

MW-6II     S225.00 


Dealer  Inquiries  inviied 

Tors: 

fMAIrarCoiulj 


Micro  World  Computers,  Inc. 

3333  VV.  Wadswoflh  Blvd.  »C105 
Lake  wood,  CO  80227 


(303)987-9531 


Save  Your  Copies  of  COMPUTE! 


Protect  your  back  issues  of  COMPUTE! 
in  durable  binders  or  library  cases. 
Each  binder  or  case  is  custom-made 
in  flag-blue  binding  with  embossed 
white  lettering.  Each  holds  a  year  of 
COMPUTE!.  Order  several  and  keep 
your  issues  of  COMPUTE!  neatly  or- 
ganized for  quick  reference, 
(These  binders  make  great 
gifts,  too!) 


Cases: 

S6,95  each; 
3  for  $20,00; 
6  for  $36.00 


Binders 

S8.50  each; 
3  tor  S24.75: 
6  for  348,00 


(Please  add  32.50  per  unit  for  orders 
outside  the  U.S.) 

Send  in  your  prepaid  order  with  the 
attached  coupon 


Mail  to:  Jesse  Jones  Industries,  P.O.  Box  5120, 

Dept,  Code  COTE. Philadelphia,  PA  19141 

Please  send  me COMPUTE!    D  cases 


Enclosed  is  my  check  or  money  order  for  $  , 
only,) 

Nome 

Address 


D  binders. 
_  .  CU,S.  funds 


City 

State 

Satisfaction  guaranteed  or  monev  refunded 
Please  allow  4-6  weeks  for  delivery 


Zip. 


screen — 38  characters  per  physical  line. 
That  mentis  a  logical  line  can  be  up  to  114 
characters  long,  and  the  luaming  buzzer 
sounds  after  107  characters.  But  this  can 
be  adjusted  by  storitig  different  numbers 
into  tioo  memory  locations  which  control 
the  screen  margins.  Location  82  sets  the 
left  Ttiargin  atid  location  83  sets  the  right 
margin. 

These  locations  usually  contain  the 
values  2  and  39,  respectively.  Atari  pre- 
sets the  left  margin  at  2  because  many 
people  plug  their  computers  into  TV  sets, 
and  TVs  often  suffer  from  overscan — they 
display  slightly  less  than  the  entire  itnage 
area  on  their  screens.  Minor  overscan  is 
rarely  noticeable  when  watching  TV 
shows,  but  it  can  clip  off  a  column  or  tiuo 
of  characters  along  the  margins  when  you 
plug  in  a  computer.  By  defaulting  to  a  38- 
column  screen  instead  of  40  columns. 
Atari  computers  automatically  compen- 
sate for  overscan.  If  your  TV  doesn't 
overscan,  or  if  you  have  a  computer  moni- 
tor, you  can  reset  the  left  margin  to  40 
columns  with  the  statement  POKE  82,0. 
This  allows  40-character  physical  lines 
and  120-character  logical  lines.  The 
warning  buzzer  won't  sound  until  the 
113th  character.  (SYSTEM  RESET  restores 
the  default  value.)  On  the  other  hand,  if  a 
TV  suffers  from  extreme  overscan,  you  can 
make  the  screen  narrower  by  POKEing 
larger  numbers  into  location  82  and 
smaller  numbers  into  location  39.  This,  in 
turn,  reduces  the  number  of  characters  per 
physical  line  and  logical  line. 

Keep  in  mind,  however,  that  you  can 
exceed  the  logical  line  limit  by  using  ab- 
breviated keywords.  For  example,  type 
this  line  exactly  as  shown: 

IG  GR.7:SE.4,0,0:C.1;PL.20,20:DR.40,20 
:DR.40,40:DR.20,40:DR.20,20:DR.40,40 
:FL.40,20:DR.20,40 

GR.  IS  the  abbreviation  for  GRAPH- 
ICS, SE.  stands  for  SETCOLOR,  C.  is 
COLOR,  PL.  is  PLOT,  and  DR.  is 
DRAWTO.  Abbreviated,  these  commands 
total  92  characters  and  fit  comfortably  in  a 
logical  line  of  three  physical  lines.  But 
when  you  type  LIST,  Atari  BASIC  auto- 
matically expands  the  abbreviations  and 
the  statement  overflows  into  four  physical 
lines  with  a  total  of  136  characters.  Ordi- 
narily, you  coiddn't  type  a  logical  line 
that  long.  If  you  type  RUN,  the  program 
executes  perfectly,  so  this  is  one  way  of 
squeezing  more  statements  into  a  logical 
line.  Hoivever,  the  technique  should  be 
avoided  for  two  reasons:  Other  people 
can't  type  this  line  without  also  using 
abbreviations,  and  any  editing  zvhich 
changes  the  length  of  a  statement  also 
chops  off  all  the  characters  following  the 
third  physical  line.  @ 
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Get  lliBJump  on  the  weather- 
man by  accurately  forecasting 
the  local  weather  vourselH 


The  hyautiful  princess  is  held 
captive  hy  deadly  dragons.  Only 
akniiiht  in  shining  armor  can 
pave  iicr  now! 


A  time-saving' organizer  for 
cu\ipons,  receipts  and  more. 


A  scientifically  proven  way  to 
develop  an  awesome  memory. 


Cut  your  ener|^'  coats  by  moni- 
toring your  phone,  electric  and 
gas  bills. 


G(*tFCT  fi»B«K  !h  A  raw*  * 

BSQaQBQ  !E 

D    a 


SthiHil-it^t'  .iiul  prt'-sihuol 
children  are  rewarded  for  right 
answer.s,  corrected  on  their 
wron^'ones. 


You  are  trapped  in  a  five- 
sloryi  125-room  structure 
made  entirely  of  ice.  Find  the 
exit  before  y<ju  freeze! 


Computerize  car  maintenance 
to  improve  auto  performance, 
economy  and  resale  value. 


^x    ^     ^  • 


^EFk^lOR 


.3 


^         ^     -^         y 


A  real  bramtlexer.  !)eflecL 
random  balls  into  largelson 
a  constantly  changing  playfield. 


Take  control  of  your  personal 
Tinances  in  less  than  one  hour 
ii  month. 


C.Tt'ale  niulti-colnred  bar 
graphs  with  a  surprisingly 
small  amount  of  meniorj'. 


A  Jun  WMV  to  (Ir^niiiLliciiliy 
increase  typing  speed  and 
accuracy. 


Get  up  to  30  new  programs  and  games 

for  less  than  15  cents  each — 

every  month  in  COMPUTE! 


Every  month,  COMPUTE!  readers  enjoy  up  to 
30  brand-new,  ready-to-run  computer  pro- 
grams, even  arcade-quality  games. 

And  when  you  subscribe  to  COMPUTE!, 
you'll  get  them  all  for  less  than  15  cents  each! 

You'll  find  programs  to  help  you  conserve 
time,  energy  and  money.  Programs  like  Cash 
Flow  Manager,  Retirement  Planner,  Coupon 
Filer,  Dynamic  Bookkeeping. 

You'll  enjoy  games  like  Air  Defense, 
Boggier,  Slalom,  and  High  Speed  Mazer. 

Your  children  will  find  learning  fast  and^ 
fun  with  First  Math,  Guess  That  Animal,  and 
Mystery  Spell. 

Looking  for  a  challenge?  You  can  write 
your  own  games.  Customize  BASIC  programs. 
Even  make  beautiful  computer  music  and 
pictures. 

It's  all  in  COMPUTE!.  All  ready  to  type 
in  and  run  on  your  Atari,  Apple,  Commodore, 
PET/CBM,  TI-99/4A,  Radio  Shack  Color 
Computer,  IBM  PC  or  IBM  PCjr. 


What's  .more,  you  get  information-packed 
articles,  product  reviews,  ideas  and  advice  that 
add  power  and  excitement  to  all  your  home 
computing. 

And  when  it's  time  to  shop  for  peripherals 
or  hardware,  check  COMPUTE!  first.  Our 
product  evaluations  can  save  you  money  and 
costly  mistakes.  We'll  even  help  you  decide 
what  to  buy:  Dot-matrix  or  daisy-wheel  printer? 
Tape  storage  or  disk  drive?  What  about 
modems?  Memory  expansion  kits?  What's  new 
in  joysticks,  paddles  and  track  balls? 

Order  now!  Mail  the  postpaid  card  attached 
to  this  ad  and  start  receiving  every  issue  of 
COMPUTE!. 


For  Faster 

Service 

Call  Toll-Free 

1-800-247-5470 

(in  Iowa 
1-800-532-1272) 


COMPUTEI  P.O.  Box  10954,  Des  Moines,  lA  50340 
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Genealogy 

OF  A 

CHIP 

The  68000  Yesterday,  Today, 
And  Tomorrow 


Selby  Bateman,  Features  Editor 

Motorola 's  68000  microprocessor  is  the  powerhouse  beneath  the 
hood  of  a  new  generation  of  leading-edge  personal  computers — 
the  Commodore  Amiga,  Atari  520ST,  and  Apple  Macintosh. 
With  its  hybrid  16/32-bit  architecture  and  remarkable  processing 
speed,  the  68000  is  helping  to  bring  a  new  level  of  flexibility  to 
personal  computing. 

8080,  Z80,  6502,  8088,  68000— To  a  computer  enthusiast,  these  strange 
numbers  tell  a  fascinating  story  about  the  continuing  development  of  the 
personal  computer.  They're  the  microprocessors  that  helped  make  millions 
of  computers  affordable  to  millions  of  people.  At  one  time  or  another,  these 
were  the  best  brains — computer  brains — our  money  could  buy. 

In  the  history  of  microelectronics,  they'll  be  remembered  as  the  first 
personal  computer  microprocessors  to  invade  American  homes,  schools, 
and  businesses  in  Apple,  Atari,  Commodore,  IBM,  and  a  flock  of  other 
computers.  Each  of  these  microprocessors  has  its  own  parents,  cousins,  and 
children.  The  family  names  come  from  companies  called  Intel,  Zilog,  MOS 
Technology,  and  Motorola. 

Hidden  beneath  the  computer's  shell,  a  microprocessor  is  little  more 
than  a  fingernail-sized  wafer  of  silicon  containing  an  intricate  grid  of  almost 
microscopic  transistorized  circuits.  But  the  tiny  microprocessor  is  the  central 
processing  unit  (CPU),  or  brain,  that  controls  or  coordinates  virtually 
everything  that  goes  on  in  the  computer.  It  gathers  instructions  from  the 
computer's  memory,  executes  those  instructions,  and  stores  the  resulting 
information  back  into  memory. 

A  microprocessor  does  what  its  name  implies — processes  information. 
And  that  information  is  in  the  form  of  electrical  signals.  To  make  sense  of 
the  signals,  the  computer  uses  a  binary  code  of  ones  and  zeros  that  matches 
the  on  or  o// states  of  electricity.  Each  on  or  off  position  is  defined  as  a  binar}/ 
digit,  or  bit,  of  data. 

During  the  past  several  years,  millions  of  people  have  become 
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acquainted  with  computers  that 
have  microprocessors  capable  of 
handling  eight  bits  of  information 
at  a  time.  These  eight-bit  machines 
include  many  of  the  most  popular 
computers  first  used  in  homes, 
schools,  and  small  businesses.  For 
example,  the  Commodore  64  is 
based  on  MOS  Technology's  6510 
microprocessor,  a  sibling  of  the  ear- 
lier 6502  microprocessor  used  in 
the  Commodore  PET,  VIC-20,  Ap- 
ple II/II-I-,  and  Atari  400/800/  XL 
computers.  Other  eight-bit  6502- 
compatible  microprocessors  are  the 
6502B  (Apple  He),  6502C  (Atari 
130XE),  65C02  (Apple  lie),  7501 
(Commodore  Plus/4  and  16),  and 
the  8502  (Commodore  128).  The 
strengths  and  limitations  of  each  of 
these  chips  have  helped  define  the 
nature  of  the  computers  in  which 
they're  housed. 

A  microprocessor  CPU  in  to- 
day's computers  is  usually  but  one 
of  a  number  of  integrated  circuit 
chips  carrying  on  the  work.  But  the 
other  chips,  unlike  a  microproces- 
sor, are  dedicated  to  certain  func- 
tions such  as  memory  or  special 
support  functions.  The  Commo- 
dore 64,  for  instance,  also  has  a 
sophisticated  programmable  three- 
voice  sound  chip  (the  6581  Sound 
Interface  Device)  and  a  versatile 
graphics  chip  (the  6567  Video  Inter- 
face Chip).  The  Commodore  64's 
CPU,  the  6510,  coordinates  the  ac- 
tivities of  these  chips  and  others. 
Because  the  CPU  itself  doesn't  have 
to  carry  out  the  duties  of  these  sup- 
port chips,  it's  freed  to  carry  on  its 
other  activities  without  losing  sig- 
nificant processing  speed. 

The  latest  personal  computers 
to  hit  the  market,  such  as  the 
Amiga,  advance  this  principle  even 
further  by  making  the  CPU  the  con- 
ductor of  a  whole  orchestra  of  sup- 
port chips.  At  the  same  time,  the 
latest  CPU  chips  have  grown  so 
powerful  that  they're  now  capable 
of  running  several  programs  simul- 
taneously.   The    newest   micro- 


(Preceding  page)  A  microscope's  view  of 
Motorola's  new  68020  microprocessor. 
The  chip's  actual  size  is  about  the  diam- 
eter of  an  adult's  little  fingernail. 
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processors  emerging  from  today's 
laboratories'  pack  the  power  of  a 
large  mainframe  computer  onto  a 
tiny  chip  of  silicon. 

It  was  little  more  than  a  dozen 
years  ago,  in  1972,  that  Robert 
Noyce's  Intel  Corporation  cre- 
ated the  first  functioning  micro- 
processor— the  four-bit  4004, 
developed  by  an  engineer  named 
Ted  Hoff.  Instead  of  "hard-wiring" 
several  small  chips  together  to 
accomplish  certain  tasks,  engineers 
could  now  program  the  micro- 
processor to  do  a  variety  of  opera- 
tions. This  four-bit  chip  found  its 
most  useful  home  in  a  generation  of 
hand-held  calculators. 

Intel  soon  followed  with  the 
first  eight-bit  microprocessor,  the 
8008,  and  then  with  the  8080.  The 
8080A  became  the  CPU  for  the  first 
hobbyist  computer,  the  MITS  Al- 
tair,  introduced  as  a  do-it-yourself 
kit  in  1975.  Soon  other  companies 
joined  in  the  race.  Zilog  introduced 
the  eight-bit  Z80,  which  became 
the  CPU  for  a  multitude  of  personal 
computers  from  Radio  Shack,  Os- 
borne, Kaypro,  Timex/Sinclair,  and 
others.  A  Z80  chip  is  also  one  of  the 
two  microprocessors  found  in  the 
Commodore  128.  At  about  the 
same  time,  MOS  Technology  creat- 
ed the  popular  eight-bit  6502,  and 
Motorola  introduced  the  eight-bit 
6800. 

These  microprocessors  per- 
form quite  similarly,  despite  indi- 
vidual differences  in  the  ways  they 
handle  such  internal  functions  as 
addressing  modes,  memory  regis- 
ters, and  other  operations.  All  of 
them  fetch,  execute,  and  store  data 
eight  bits  at  a  time  within  CPU 
pathways  called  buses.  There  are  at 
least  three  basic  kinds  of  buses  in 
most  microprocessors:  a  data  bus, 
an  address  bus,  and  a  control  bus. 
The  width  of  these  buses  determine 
whether  a  microprocessor  is  con- 
sidered an  eight-bit,  16-bit,  or  hy- 
brid chip. 

Today's  microprocessors  in- 
clude a  number  of  similar  sections, 
each  having  specified  duties.  The 
components  of  a  chip  include  an 


instruction  set,  simple  commands 
that  are  hard-wired  into  the  micro- 
processor; registers  for  storing  and 
manipulating  instructions;  buses 
for  carrying  data;  an  internal  clock 
that  helps  organize  the  flow  of  data; 
a  logic  unit  for  mathematical  calcu- 
lations; and  a  decoder  that  interprets 
the  instruction  set. 

There  are  also  other  function- 
ing units  and  subunits  within  every 
CPU,  such  as  accumulators,  status 
registers,  interrupt  functions,  and 
program  counters.  And  every  micro- 
processor has  its  own  unique  style 
of  handling  data. 


In  1981,  IBM  introduced  its  first 
personal  computer,  the  IBM  PC, 
which  uses  Intel's  8088  micro- 
processor (a  more  sophisticated  de- 
scendant of  the  earlier  8008).  The 
8088  is  a  hybrid  chip,  a  mixed- 
mode  CPU  that  handles  internal 
bus  communications  16  bits  at  a 
time  and  external  communications 
eight  bits  at  a  time.  This  8/16-bit 
microprocessor  can  address,  or  ac- 
cess, up  to  a  megabyte  of  memory 
(1,024K,  or  1,048,576  bytes).  In 
contrast,  an  eight-bit  chip  like  the 
6502  or  Z80  can  address  only  64K 
(65,536  bytes)  of  memory. 

In  1983,  Apple  introduced  the 
Macintosh,  the  first  popular  per- 
sonal computer  based  on  the  Mo- 
torola 68000,  a  hybrid  chip  even 
more  powerful  than  the  8088.  This 
16/32-bit  descendent  of  the  6800 
processes  32  bits  of  information  at  a 
time  on  its  internal  buses  and  16 
bits  in  external  communication. 
And  it  can  directly  address  up  to  16 
megabytes  of  memory — 16,384K, 
or  16,777,220  bytes. 

Work  began  on  the  68000  in 
the  mid-1970s.  Motorola  formed  a 
project  team  known  within  the 
company  as  MACSS  (Motorola's 
Advanced  Computer  System  on 
Silicon),  The  result  of  that  effort 
was  announced  in  1979,  when  Mo- 
torola first  demonstrated  the  new 
microprocessor. 

In  addition  to  the  68000's 
16/32-bit  processing  capability,  it 
also  has  a  potential  internal  clock 
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The  68020  microprocessor  contains  the  equivalent  of  200,000  transistors.  Major  functions  of  the  chip  shown  here  include  Read 
Only  Memory  microcode  and  control  sections;  progrannnable  logic  array  (PLA)  units;  data  and  address  buffers;  clock  generators; 
function  code  (FC)  logic  and  size  logic  sections;  program  counter,  address,  and  data  execution  units;  interrupt  logic;  bus  controller; 
and  instruction  pipeline. 


speed  of  12.5  megahertz  (MHz). 
The  clock  speed  is  essentially  how 
fast  a  chip  runs,  based  on  the  num- 
ber of  cycles  an  electrical  signal  can 
make  through  the  chip  per  second. 
Hence,  1  Hz  is  equivalent  to  one 
cycle  per  second;  1  MHz  equals  one 
million  cycles  per  second.  The 
higher  the  clock  speed,  the  more 
instructions  a  CPU  can  fetch  and 
execute  per  second. 
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Compare  the  68000's  6-12.5 
MHz  clock  speed  to  the  1  MHz 
speed  of  a  Commodore  64,  or  the 
4.77  MHz  clock  speed  of  an  IBM 
PC.  The  current  crop  of  68000- 
based  personal  computers  general- 
ly have  clock  speeds  in  the  7  to  8 
MHz  range.  The  Macintosh  has  a 
clock  speed  of  7.8  MHz,  the  Amiga 
has  a  clock  speed  of  7.16  MHz,  and 
the  Atari  520ST  runs  at  8  MHz.  But 


many  other  factors  besides  raw 
clock  speed  determine  a  computer's 
overall  speed,  including  the  effi- 
ciency of  its  operating  system  and 
other  system  software. 

To  date,  the  Amiga  makes  the 
most  efficient  use  of  the  68000  mi- 
croprocessor because  it  incorpo- 
rates three  custom-designed  VLSI 
(Very  Large  Scale  Integration)  chips 
for  sophisticated  support  functions. 
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1-800-221-4283 

CUSTOMER  SERVICE 

&  TECH  SUPPORT 
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CREDIT  CARDS 


SHIPPING  """■ 

Add  3%,  minimum  S5-00  shipping 
and  handling  on  all  orders  Larger 
shipments  may  require  addmonai 
charges- 

All  Items  subiect  to  availability  and 
price  change. 

Returned  shipments  may  be  sub- 
10  a  resiocking  fee 


ATARI 

130XE  |12eK) CALL 

S20ST   (512K) CALL 

80QXL  S4K CALL 

1010  Recorder S49.99 

1050  Disk  Drive CALL 

1027  LsllBf  Qualily  Printer S1Z9.00 

1030  Direct  Connect  Modem S59.99 

Software  Specials 

8036  Atari  Writer S24.99 

Star  Raiders S4.99 

Missile  Command .,.S4.99 

Defender M.99 

Qalaxian S4.99 

Asieroids S4.99 

Cenlipede .,.,..„ S4.99 

Miner   2049'ar S4.99 

Eastern  Front....... ., S4.99 

SynCalc S19.99 

SynFile $19.99 

VisiCalc S39.99 

APPLE 

APPLE  lie  CALL 

APPLE   lie   CALL 

MaclNTOSH -CALL 

lie  LCD  Display   CALL 

HAVDEN 

Art  Grabber $3i  ,99 

Home  Design $49,99 

MeOia  Works $63,99 

PALADIN 

Cruncri  512 S1B900 

^£  cammodore 

Ciza  Computsr S2B9.00 

C1571  (Disk  Drive  for  C12S) SNEW 

C1902  (RGB  13"  tHonilor  lor  C1za)....SKEW 

C1670  IModem  for  C128) SNEW 

CBM  64 CALL 

C1541  DISK  Drive S199.O0 

CI  530  Dalasetta .-.339.99 

M'BOl  Doi  Matrix  pnnler S169.00 

MCS  803  Dot  r/atnx SI  79.00 

C1702  Color  Monitor S189.00 

CI66O  AuIO  Modem $59.99 

DPS  1101  Daisy  Printer $339.00 


PORTABLE  COMPUTERS 


tlipl   HEWLETT 
WlltM  PACKARD 

41CV $169  99 

45CX. $249.99 

HP  11c .$62-99 

HP  12c SB9.99 

HP  15C SB9,99 

HP  16C SB9.99 

HPIL  Module S98.99 

HPIL  Casseile  or  Printer $359.99 

Card  Reader $143  99 

Extended  Function  Module 363,99 

Time  Module S63.99 

W(  stock  th«  lull  Una  of 
HP  calculator  product! 

SEQ 

PC-B4C1    LS CALL 

PC-8201  Portable  Computar.... $319.00 

PC-8231   Disk  Drive $599,00 

PC-8221A  Ttiermal  Printers S149.00 

PC-8281A  Data  Recorder $9999 

PC-8201-06  8K  RAM  Chips S79.99 

SHARP 

PC-13S0 $169-99 

PC-1261  $159-99 

PC-1260 S99.99 

PC-ISOOA $169,99 

PC-1250A $89.99 

CE-125  Printer/Cassette 3129.99 

CE-160  Color  Printer  Cassette.Sl  59.99 
CE-161  I6K  RAM $1:34.99 


ATARI  520-ST 
SOFTWARE 

SIERRA  OH  LINE 

Ultima  II ,--.539-99 

GalO .329.99 

INFOCOM 

Zork  I,  II.  Ill, (ea.)  329.99 

Hilchiker's  Guide ..--529-99 

VVishbringer S29.99 

Suspended ,,,.., 537.99 

HABA 

Hippo-C S49.99 

MIRAGE  CONCEPTS 

Express -..$34.99 

ST-Too!bOK CALL 

MARK  OF  THE  UNICORN 

Final  Word $94.99 

Hex $29.99 

PC  Intercom S89.99 

MINDSCAPE 
Halley  Pro|60i $34.99 


Macintosh  Software 

Lotus  Jazz CALL 

MIcrosaH   Excel 3259.00 

Living  Videotext 

ThinkTank   512 3159.00 

Manhatten  Ready.  Set.  Go $79.99 

Crotghton  Devalopment 

Mac  Spell S69.99 

Monogram  Dollars  &  Sense. ...$99.99 
Paactitree  Back  10  Basics  -  GL$1 09.00 
PFS  File  S  Repot  (New  VBrsion)$l  19.00 
Silicon  Beach  Airborn S2S.99 


Professional  Soltwaic 

Fleet  System  II  w/Spe!|>-{12B)...S49  99 

Trivia  Fever 329,99 

Word  Pro  4  Plus/5  Plus  each, .,$239.00 

Inio  Pro $179.00 

BRODERBUND 

The  Prim  Shop 329.99 

Music  Shop 329.99 
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File  (64| 349.99 

Paperclip  w/Spell  Pack 364  99 

The  Consullam  DBMS 545.99 

Bus  Card  II „. 5139.00 

80  Col  Display 5129.00 


DISKETTES 


maxell 

S'/j"  SS/DD  (10) -.524-99 

3'/:"  DS/DD  (10) 339.99 

5'A"  MD-1  w/Hardcases  (10) 313.99 

5-/<:"  MD-2  W/Hardcases  (10) 319.99 

5'A"  MD-2-HD  lor  AT  (10) 339.99 

SVj"  5  pack  SS/DD $15-99 

5%"  SS/DD $19.99 

SVi"  DS/DD S24.99 

Disk  Analyzer $24.99 


Elephant  3'A"  SS/DD $29.99 

Elephant  5'A"  SS/SD $13.99 

Elephant  5y."  SS/DD $15.99 

Elephant  SVi"  DS/DD S16.99 

Elephant  Premium  DS/DD $22.99 


SV."  DS/DD  lloppy  disks 

(Box  of  10) S26.99 

DISK  HOLDERS 

INNOVATIVE  CONCEPTS 

Flip-in-File  10 52.99 

Flip-in-Fiie  50 $17.99 

Flip-in-File  50  w/lock $24.99 

Flip-in-Fiie  (400/800  ROM) $11.99 

Flip-in-File   100 $24,99 

AMARAY 

50  Disk  Tub  5W S9-99 

30  Disk  Tub  SVi" SB.E 


^NCHOf? 

Volksmodem $59.99 

Volksmodem  300/1200 , 5189.99 

Signalman  Express ,..$29900 

Lrghlning  2400  Baud 5399,00 

DIGITAL  DEVICES 

AT300  -  300  Baud  (Atari) .,$99.99 

5)  Hayes 

Smartmodem  300 5139.00 

Smartmodem  1200 5339. (M 

Smartmodem   1200B $359,00 

Smartmodem  2400 S599.00 

Mic/omodem  He $149,00 

Smart  Com  II S89.99 

Chronograph $199,00 

Transet  1000 $309,00 

Reach  1200  Baud  Half  Card. ,.$399,00 

trw  miCROBITS 

MPP-1064  AD/AA  (C-64) $69,99 

Smart  Cat  Plus 3319.00 

J-Cat $99.99 

h/ovation  2400 $499.00 

Apple  Cat  II 3229.00 

212  Apple  Cat  II $379.00 

Apple  Cat  212  Upgrade 5229.00 

Macmodem..... $279.00 

Ouadmodem  II 

300/1200 3339.00 

300/1200/2400 .$499.00 

TELELEARNING 

C64  300  Baud (Closeoul) $39,99 

EVEREX 
1200  Baud  Internal  (IBM/PC). .$199.00 


GRAPHICS 


■Polaroid 

Palatle 31299,00 


DRIVES 


HARD 

10  meg  Bernoulli  Box $1899.00 

20  meg  Bemouili  Box 32599.00 

5  meg  "MacNoulli" 51499.00 

TALICUUS 
TECHNOLQCIES 

25,  35,  50,  80  meg  (PC) 

from  51299,00 

IRWIN 

Tape  Backup CALL 

-^VEREX- 

60  Meg  Iniemal  Backup  Sys1em$e29.00 

U-SCJ 

10  meg  Iniernal  IBM 3399.00 

20  meg  Iniernal  IBM $549.00 


FLOPPY 

Indus 

Atari  GT $219.00 

C-64  GT 3219.00 

MICRO  SCI 

A1.5  Apple 5179,00 

A2       Apple $179.00 

SDl   C-64  Single ..-$219,00 

SD2  C-64  Dual $469,00 

landon 

320K  5W"  (PC) 5109,00 

TEAC 

320K  5Vj" 5109,00 


Video  300  Gfeen S129.00 

Video  3D0A  Amber. S139.00 

Video  310A  Amber  TTL S169.00 

Color  300  Composite $179,00 

Color  500  Composile/RGB £249.00 

Color  600  Hi-Res.  RGB 5399,00 

Color  710  Ullra  Hi-Res S4B9.00 

Color  m  Dual  Mode S549.00 

SEC 

JB1270G/127SA (ea.)  S99.99 

JB1280GTTL S129.00 

JBiaaSG  TTL S129.00 

JC14SQ  RG6 S249.00 

JC1225  Composite SI  79.00 

PRINCETON 

MAX-12E   Amber SI 79, 00 

HX-9  9"  RGB S469.00 

HX-9E   Enhanced ,S519.00 

HX-12  12"  RGB 3469.00 

HX.12E  Enhanced 8559.00 

SR-12   Hi-Res S599.00 

«iTAXAM 

115  12"  Green S119.00 

116  12"  Amber 5129.00 

121  TTL  Green S139.00 

122  TTL  Amber S149.00 

610  510x200  RGB SNEW 

620  640x200  RGB SNEW 

630  640x200  RGB SNEW 

640  720x400  RGB SNEW 

84Q0  Quaachrome  I S499.00 

8410  Qjadchrome  II S339.00 

8420  Amberchrome SI  79.00 

asoo  Quad  Screen S149.00 

ZVM   1220/1230 (ea.)  599.99 

ZVM  1240  IBM  Amber 5149.00 

ZVM  130  Color .5269.00 

ZVM  131  Color 5249.00 

ZVM  133  RGB  ...5429.00 

ZVM   135  RGB/Color S459.00 

ZVM   136  RGB/Color 5599.00 


INTERFACES 


Mjlli  I/O  (Apple  ll.l 3159.00 

MMifitcnau. 

Graphcard S79.99 

Seriall  Card 399.99 

Microbufler  11  + Si  69.00 

Microbufler   32K SI 89.00 

Microfazer. (rom  S139.C0 

Elaier  (Epson) (rom    579.99 

UOrange  micro 

Grappler  CD  (C64) $69,99 

Grappler  +  (Apple) 569.99 

Grappler  16K-t  (Apple) $169,00 

DIGITAL  DEVICES 

Ape  Face  [Atari) , .,„-.S49.99 

U-Print  A  (Alari) 554.99 

U-A16/Bufler  (Alari). ......574.99 

U-Call  Interface  (Atari) 539.99 

U-Print  C  (C64) 549.99 

P-16  Print  Bufler 574.99 

U-Print  16  appie  He SS9.99 


PRINTERS 


Canon 

A40 CALL 

LBP-eAl    Laser CALL 

#CITIZEN 

MSP-IO  (80  col.) .5279.00 

MSP-15  (132  col.) 5389.00 

MSP-20  (80  col.) 5349,00 

MSP-25  (132  col.) 5509.00 

crroH 

Prowriler   7500 Si 99.00 

Prowriler   15S0P ,..S349.00 

Slarwnter    10-30 $399.00 

corona 

Lazer  LP-300 52799.00 

DIABLO 

D25  Daisywheel 5549,00 

635  Daisywtieel 5899.00 

D80IF  Daisywheel CALL 

dteywriter 

2000 S749.00 

EPSON 

Homewnier  10.  LX-80.  LX.90 CALL 

FX-85,  FX-185,  RX-100,  JX-BO CALL 

DX-10.  DX-20,  DX-35,  LO-1500...,CALL 

SQ-2000,  Hi-eo.  Hs-eo.  ap-bo call 

LO-600.    LQ-IOOO CALL 

Epson/Comrex  220-Atari 589,99 

■lUKI 

6000  Leller  Quality CALL 

6100  Letter  Quality. CALL 

6200  Leller  Quality CALL 

6300  Letter  Quality CALL 

5510  Dot  Matrix CALL 

LEGEND 

808  Dot  Malra  100  cps S179.00 

lOaO  Dot  Matrix  100  cps S259.00 

1380  Dot  Matrix  130  Cps S289.00 

1385  Dot  Matnx  165  cps S339.(X) 

SEQ 

8027  Transportable 5199.00 

3000  Series,. S1099.00 

8000  Series...- $1399  00 

ELF  360 5449. (X) 

Pinwnter  560 S999.00 

OKIDATA 

182.  183,  192.  193.  2410.  84 CALL 

Okimate  10  (Specily  C54Wlari)Sl  89.00 
Okimale  20  (I3M} CALL 

Panasonic 

KX1080 SNEW 

KX1091 S259.00 

KX1092 $389.00 

KX1D93 -S479.00 

Quadjet S399.00 

Quad  Laser CALL 

^SJL^ER-REED 

500  Letter  Quality S279.00 

550  Letter  Quality 5419.00 

770  Letter  Quality S759.00 

iisaiif 

SG-IOC  (C64  Interlace) CALL 

SB/SD/SQ/SR  Series .CALL 

Powenype  Letter  Qjalily CALL 

Texas  Instruments 

TIB50 S529.00 

TIB65 5639.00 

TI865 S799.00 

TOSHIBA 

1340  (80  column) 5469.00 

P341  (132  column) 5949.00 

P351  (132  column) 51099.00 


PC  COMPATIBLES 


SOFTWARE  FOR  IBM 


IBM  PC  SYSTEMS 

CQnflgured  to  your 

specification. 
Caii  for  Best  Price! 

IBM-PC,  IBM-PC  II,  IBM-XT,  IBM-AT 

KP-2000  Portable CALL 

ASHTON-TATE 

Framework  II 5399.00 

dBase  111 ....$369.00 

BORLAND 

Turbo  Pascal  3.0 549,99 

Sidekick  (unprotected) .$59.99 

■Rellex SS9-99 

CENTRAL  POINT 

Copy  II  PC-Backup 529.99 

DECISION  RESOURCES 

Ctiartmaster $229.00 

Signmasler S169.00 

Diagram  Master 5219.00 

ENEnrnoNics 

Energraptiics/Ploi $289.00 

FOX  &  GELLER 

Quickcoae  III... 5169.00 

FUNK  SOFTWARE 

Sideways S39.99 

HARVARD  SOFTWARE 

Total  Project  Manager $369.00 

INFOCOM 

Cornerstone $279.00 

LIFETREE 

Volkswriter  Deluxe SI  59.00 

LIVING  VIDEOTEXT 

Ttiink  Tank $109.00 

Ready $64.99 

LOTUS 

Symptiony.,... CALL 

1-2-3 CALL 

MECA  SOFTWARE 

Managing  Your  Money  2.0 $109.00 

MICROSTUF  SOFTWARE 

Crosstalk  XVI 589.99 

Crosstalk  Mark  IV 5149.00 

Remote 589.99 

MICRORIM  SOFTWARE 

R:Base  4000 5249.00 

R:Base  5000 $389.00 

Clout  2.0 S129.00 

MICROPRO 

WordStar  2000 S249.00 

WordStar  2000  * S299.00 

WordStar   Professional $299.00 

Easy 599.99 

MICROSOFT 

Word S229.00 

Mouse S139.00 

Flight  Simulator...... .„,„.S39.99 

MulliPlan $129.00 

MULTIMATE 

Advantage 5299.00 

Multi  Mate  Word  Proc 5249.00 

On  File S94.99 

Just  Wnl8 S94.99 

NOUEMENON 

Intuii $69,99 

NORTON 

Norton  utilities  3.1 559.99 

ONE  STEP 

Golfs  Best S39.99 

PEACHTREE  SOFTWARE 

Peachlent  5000 $179.00 

PFS:IBM 

First  Success 5209.00 

Fiie/Grapti .....(ea)  579.99 

Report $74.99 

Wnle/Prool  Combo $79.99 

PROFESSIONAL  SOFTWARE 

Wordplu5-PC  w/Boss 5249.00 

THE  SOFTWARE  GROUP 

Enable 5259.00 

SATELLITE  SYSTEMS 

Word  Perfect  4.1 , 5219.00 

SORCIMflUS 
Accounting 

AP/AR/GUINV/OE (ea.)  5295.00 

SuperCalc  HI 5195.00 

EasyWriier  II  System $195.00 

Super  Project 5195.1X1 

SPI  SOFTWARE 

Open  Access., $379.00 

SUBLOGIC 

Jet $39.99 

5tfi  GENERATION 
Fasi   Back ,. $119,00 


PC-138  Series CALL 

PC-148   Series CALL 

PC-isa  Series CALL 

PC-160  Series CALL 

PC-171   Series CALL 

AT-200  Series CALL 

@ SANYO 

MBC  660-2  Single  Drive S649.00 

MBC  5S5-2  Dual  Drive S949.00 

MBC  675  Portable CALL 

MBC775 SI 699  00 

MBC  8SQ  Desktop CALL 

Safari  (7300) CALL 

6300 CALL 

coronei 

PPC400  Dual  Portable S12B9.00 

PPCXT  10  meg  Portable $1989.00 

PC40022  Dual  Desktop $1389.00 

PC400-HD2  10  meg $1989.00 

ITT 
ITT  X-TRA 

266K.  2  DnvB  System .......CALL 

256K,10  meg  Hard  Drive  System  CALL 
XP5,  20  meg CALL 

Sperry-AT as  lov*  as  51749.00 

Sperry-IT as  low  as  52699,00 

Call  for  Specific  Conligurationl 
All  Motlels CALL 


MULTIFUNCTION  CARDS 


Six  Pack  Plus $229.00 

Mega  Plus  II 5269.00 

I/O  Plus  II $139.00 

Advaniage-AT $3yB.Q0 

Graph  Pak/64K SS99.00 

MonoGraph  Plus 5399.00 

Preview  Mono , $299.00 

PC  Net  Cards S379.00 

5251(1 1  On-line 5669,00 

5251(12  Remote $579.00 

IRMA  3270. ..^^~^ SB79.00 

IRMA  Print 5999,00 

IRMA  Smart  Alec $779.00 

Edge  Card 5269.00 

Graphics  Edge 5289.00 

Magic  Card  I! 5169.00 

HERCfLEs 

Graphics $299.00 

Cotor S159.00 

IDEAsiodaics 

IDEA   5251 5589.00 

MYLEX 

The  Chairman 5469.00 

PARADISE 

Color/Mono  Card $159,00 

Modular  Graphics  Card 5279.00 

Multi  Display  Card 5259.00 

Five  Pack  C,  S S129.00 

Bob    Board $369.00 

Captain  -  64 _ 5199,00 

Caplam  Jr.  128K $199.00 

Graphics  Masier $469.00 

Quadport-AT ^I™^..  SI  19.00 

Liberty-AT  (12aK| 5349.00 

The  Gold  Ouadboard 5449.00 

The  Silver  Ouadboard $239.00 

Enpanded  Ouadboard S209  00 

Liberty. 5309.00 

OuadSpririt 5499.00 

OuadLink 5399,00 

OuadCoior... 5199.00 

Ouadjr.  Expansion  Chassis, .,,,5469. 00 

Expansion  Chassis  Memory S199.00 

Chronagraph S79.99 

Parallel  Inlertace  Board S64.99 

INTEL 

PCfJC80a7  5MHI 

PCtJC8087-2  8  MHz CALL 

PCNC802a7  6  MHz TO" 

1010  PC-Above  Board '*OUR 

1110  PS-Above  Board PC 

2010  AT-Above  Board 


^ 
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The  65816  Chip 

New  Life  For  The  6502? 


When  Apple  Computer 
introduced  the  Apple  lie 
in  April  1984,  the  com- 
pany slogan  was  "Apple  II  For- 
ever!". But  with  the  growing 
popularity  of  powerful  68000- 
based  16/32-bit  computers  like  the 
Atari  ST,  Amiga,  and  Apple's  own 
Macintosh,  is  the  Apple  II  family 
eventually  headed  for  the  eight-bit 
scrap  heap?  And  what  about  the 
future  of  other  eight-bit  computers, 
like  the  Commodore  64  and  128 
and  the  Atari  400/800/XL/XE 
computers,  all  of  which  are  based 
on  the  6502  chip  or  its  offspring? 

Veteran  chip  designer  William 
Mensch  believes  there's  still  plenty 
of  potential  in  the  venerable  6502- 
based  machines.  How  about  a  16- 
bit  Apple  II,  one  that's  still 
compatible  with  the  thousands  of 
eight-bit  Apples,  but  which  also 
can  address  up  to  16  megabytes  of 
memory  in  sections  of  64K? 

Mensch,  founder  and  director 
of  the  seven-year-old  Western  De- 
sign Center  in  Mesa,  Arizona,  has 
developed  the  8/16-bit  65816,  a 
hybrid  6502  which  is  rumored  to  be 
Apple  Computer's  choice  for  the 
future  of  the  Apple  II,  Apple  presi- 
dent John  Sculley  and  Apple's  exec- 
utive vice  president  of  product 
operations,  Del  Yocum,  have  al- 
ready announced  that  1986  is  the 
year  that  the  Apple  II  gets  a  new 
CPU. 

At  this  vmting  (late  November), 
all  Mensch  can  say  is  that  Apple 
Computer  has  had  samples  of  his 
chip  since  March  1984.  Atari 
bought  some  samples  before  Jack 
Tramiel  acquired  Atari  from 
Warner  Communications,  but 
hasn't  announced  any  plans  for  up- 


grading the  its  eight-bit  line  with 
the  65816.  Nor  has  Commodore,  so 
far. 


William  Mensch  is  no 
stranger  to  new  micro- 
processors. His  compa- 
ny created  the  65C02  chip  that 
Apple  uses  in  the  Ik.  And  prior  to 
that,  Mensch  was  one  of  the  origi- 
nal designers  of  the  6502  micro- 
processor. He  also  worked  at 
Motorola  on  the  design  team  that 
came  up  with  the  6800  chip,  the 
eight-bit  predecessor  to  the  68000. 

The  65816  is  compatible  with 
the  original  6502  (Apple  II  and 
II+),  the  6502B  (Apple  lie),  and  the 
65C02  (Apple  lie).  External  bus 
communication  is  handled  eight 
bits  at  a  time,  but  the  internal  data 
bus  handles  data  in  16-bit  chunks. 
And  the  clock  speed  of  the  65816  is 
about  4  megahertz  (MHz),  com- 
pared to  1  or  2  MHz  for  most  6502 
chips.  Mensch  says  his  design  ef- 
forts are  pushing  toward  6  and  even 
8  MHz  within  the  next  year. 

Mensch  says  a  4  MHz  65816 
could  run  from  one  to  two  million 
instructions  per  second,  about  half 
the  speed  of  a  VAX  780  minicom- 
puter, at  least  for  some  operations. 
For  word  processing  and  spread- 
sheet data  manipulation,  the  65816 
could  approach  the  performance  of 
a  VAX,  he  says.  Naturally,  func- 
tions which  depend  on  the  eight-bit 
external  bus  structure  of  the  65816 
would  not  be  as  fast. 

"My  goal  is  to  elevate  the  Ap- 
ple II  to  the  equivalent  of  a  main- 
frame for  the  single  user,"  says 
Mensch. 


Beyond  that,  Mensch  is 
shooting  for  future-genera- 
tion chips  with  dock  speeds 
of  100  MHz.  That  kind  of  speed 
would  almost  certainly  require  the 
use  of  chips  based  on  gallium  arse- 
nide crystals  rather  than  silicon, 
since  silicon  chips  tend  to  overheat 
at  higher  speeds.  Gallium  arsenide 
can  reportedly  handle  speeds  up  to 
five  times  faster  than  today's  fastest 
silicon  chips.  Mensch's  Western 
Design  Center  already  has  two  li- 
censees. Northern  Telecom  and 
GTE,  that  are  interested  in  gallium 
arsenide  versions  of  the  6502. 
Mensch  may  begin  working  toward 
that  goal  for  the  6502  and  65816 
sometime  next  year. 

If  a  16-bit  Apple  II  doesn't 
strike  you  as  wild  enough,  how 
about  a  32-bit  Apple  II?  Mensch  is 
also  developing  a  32-bit  chip,  the 
65C832,  which  is  ultimately  meant 
to  be  a  plug-in  replacement  for  the 
65816.  Mensch  says  it  will  have 
built-in  32-bit  floating  point  math 
and  other  operations.  If  an  Apple  II 
already  has  the  65816,  Mensch  says 
it  would  be  a  simple  matter  to  puU 
the  65816  board  and  plug  in  the 
65C832  board  without  replacing 
any  other  boards  or  chips.  At  this 
point,  Mensch  expects  the  32-bit 
65C832  to  be  available  within  two 
or  three  years. 

A  decision  by  Apple  Computer 
on  the  future  of  the  Apple  II  line 
and  possible  adoption  of  the  65816 
chip  may  be  announced  early  in 
1986,  perhaps  as  soon  as  the  annual 
Apple  stockholders'  meeting  in 
January. 
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COMPUTE!  Books 

For  Kids 


Help  your  children  learn  the  basics 
of  computer  programming  with  these 
two  new  entertaining  and  educational 
books  from  COMPUTEI. 


0-87455-038-6 
$14.95 


0-87455-032-7 
$14.95 


Each  book  contains  easy-to-follow  Instructions,  programming  examples,  quick  reviews,  and 
colorful  illustrations.  Written  in  COMPUTEi's  clear,  easy-to-understand  style,  tti©  books  offer 
hours  of  entertainment  while  helping  kids  (and  adults)  learn  to  program  In  BASIC. 

If  you're  acquainted  with  BASIC,  you  can  easily  write  your  own  games  and  applications  on 
Atari's  ST  or  Commodore's  128  computers.  Over  30  sections — ail  with  instructor  notes, 
lessons,  assignments,  and  lively  illustrations — entertain  and  amuse  as  you  learn  to  use 
these  powerful  computers.  COMPUTE!'s  Kids  and  the  Atari  ST  and  COMPUTEi's  Kids  and  the 
Commodore  128,  In  the  bestseiling  series  from  author  Edward  Carlson,  are  gentle 
introductions  to  programming  your  new  computer.  Clear  writing  and  concise  examples, 
both  trademarks  of  this  series,  make  It  easy  for  anyone — child  or  adult — to  learn  BASIC 
painlessfy. 


hd  other  books  from  COMPUTEI 

r  directly  from  CO 


r 


■"I 


To  order,  call  loll  free  In  the  US  1-800-346-6767  (In  NY  212-265-8360)  or  mall  the  attached  coupon  with 

your  payment  to  COMPUTEI  Books,  P.O.  Box  5038.  F.D.R.  Slollon,  New  York,  NY  10150. 
Please  send  me  the  following  COMPUTEI  books.  My  payment  Is  enclosed. 

COMPUTEI'S  Kld$  and  the  Commodore  128,  (.032-7)  $:a.9B  each  

COMPUTEI'S  Kids  and  the  Atari  ST,  (038-6)  $14.95  eacti  

Subtotal  


ALL  ORDERS 

MUST  BE 
PREPAID  IN 
U.S-  fUNDS 


n  Pavment  enclosed  (check  or  money  order) 

D  Charge     D  MasterCard     n  Visa     Q  American  Express 

Account  No. ^ 


NC  residents  add  4.5%  soles  tax 
Shipping  and  handling  per  book 
(In  U.S.  and  surface  mall,  $2.00  per 
book:  airmail,  SS.OO  per  book,) 
Total  amount  enclosed 


Exp.  Date  . 


Name  _ 
Address . 
City 


(Required) 


L. 


State 

Piease  oHow  4-6  weeks  for  delivery. 


.Zip 


.J 


COMPUTE!^  Publications  Jnc,  S. 


COMPUTEI  books  are  available  In  the  U.K.,  Europe,  the  Middle 
East,  and  Africa  from  Holt  Saunders,  Ltd.,  1  St.  Anne's  Road. 
^y^l'^^ZX^.S^^^t^y  .00,,  '^       Eastbourne.  East  Sussex  BN21  3UN,  England  and  in  Canada  from 

PuijM»" 01  ccwpuTEi  canm' 1  GoMit.  ccMviEri  aj™n. c», co«ijiii  ikj»i. or« coMBjTsi > ««>« *K*:cjfcni  Holt,  Rinetiort,  &  WinstOH.  55  Homer  Avenue,  Toronto,  ON  M8Z  4X6. 


The  chips  handle  most  of  the 
graphics,  animation,  and  program- 
mable sound  features  of  the  Amiga, 
leaving  the  68000  unrestrained 
much  of  the  time.  This  allows  the 
Amiga  to  provide  unusuall)'  power- 
ful multitasking  capabilities  and 
fast  high-resolution  graphics. 

Although  many  of  us  are  just 
beginning  to  see  the  68000 
in  action,  the  pace  of  tech- 
nological progress  in  chip  design 
has  already  leapfrogged  to  a  new 
generation.  In  1984,  Motorola  in- 
troduced the  next  step:  the  68020 
microprocessor,  a  true  32-bit  chip 
that's  equivalent  to  yesterday's 
powerful  mainframe  computers.  In 
fact,  the  68020  is  often  called  "the 
mainframe  on  a  chip." 

Packed  onto  the  surface  of  this 
tiny  microprocessor  is  the  equiva- 
lent of  200,000  transistors.  The  chip 
is  capable  of  executing  two  to  three 
million  computer  instructions  per 
second.  And  the  68020  can  address 
up  to  a  whopping  four  gigabytes  of 
memory  (4,194,304K,  or 
4,294,967,296  bytes). 

Even  more  importantly,  the 
68020  is  upwardly  compatible  with 
its  ancestors  in  the  68000  family. 
This  means  that  within  a  year  or 
two,  new  generations  of  Macin- 
toshes, Amigas,  and  STs  may  be 
using  the  68020  chip — four  times 
as  powerful  as  the  68000 — while 
remaining  compatible  with  earlier 
software  and  hardware.  In  fact,  ru- 
mors have  circulated  for  more  than 
a  year  that  Apple  Computer  may 
base  the  next  generation  of  its  Mac- 
intosh on  the  68020.  And  officials 
at  both  Atari  and  Commodore 
speak  of  their  STs  and  Amigas  in 
terms  of  machines  that  will  have 
future  generations. 

Although  Motorola  won't 
comment  on  who  may  be  planning 
to  use  the  68020,  upgrading  from 
the  68000  would  not  be  difficult, 
says  Jeff  Nutt,  Motorola's  technical 
marketing  manager  for  the  68000 
family.  "In  some  cases  it  can  be  as 
simple  as  pulling  out  the  [68000] 
processor  board  and  plugging  in 
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Technological  advances  m  silicon-based  computer  circuitry  give  today's  leading 
microprocessors  the  power  and  speed  of  mainframe  computers  for  just  a  few 
dollars  per  chip. 


the  68020  board.  And  I  think  you'll 
see  a  more  rapid  visibility  with  the 
68020  than  occurred  with  the 
68000  because  of  the  compatibility 
issue.  Look  at  the  normal  desktop 
system;  the  biggest  complaint  is 
having  to  wait  for  something  [to  be 
processed  by  the  computer].  Not  so 
with  the  68020." 


Motorola  has  not  been 
alone  in  developing  such 
powerful  new  chips,  of 
course.  Intel,  National  Semicon- 
ductor, NCR  Corp.,  and  AT&T  are 
all  competing  in  the  32-bit  micro- 
processor arena.  Motorola's  jump 
with  the  68020  and  its  compatibil- 
ity with  the  68000,  however,  have 
given  the  company  an  edge  with 
the  latest  personal  computers. 

As  a  result  of  this  fierce  compe- 


tition, chip  prices  continue  to  de- 
cline sharply.  The  68000,  which 
cost  about  $450  per  unit  early  in  its 
life,  dropped  to  about  $50  in  1984. 
And,  according  to  one  report,  in  late 
1985  Apple  Computer  was  paying 
as  little  as  $6  per  68000  chip  for 
each  Macintosh  computer. 

Where  will  it  all  end?  It  won't. 
In  fact.  Motorola  announced  in  late 
November  that  its  68020  has  now 
been  successfully  tested  at  the  pre- 
viously unheard-of  clock  speed  of 
20  MHz.  With  such  speed  and 
memory  potential,  personal  com- 
puters in  the  very  near  future  will 
truly  be  the  equivalent  of  today's 
mainframe  computers. 

"It  still  amazes  me,"  says  Mo- 
torola's Nutt.  "It's  incredible  when 
you  start  thinking  about  what  you 
can  do  with  something  that 
powerful."  @ 


WfTH  THESE  NEW  IHTRODUCTORY  BOOKS  FROM  COMPOTE!  BOOKS. 


These  titles  will  help  you  unleash  the  power  inside  your  computer.  Whether  you're  an 
experienced  programmer  learning  a  new  language  or  a  beginner  just  starting  out,  these 
books  will  show  you,  clearly  and  quickly,  how  to  get  more  than  you  ever  thought 
possible  from  your  computer. 


THE  AMAZING  AMIGA 


The  Amiga:  Your  First  Computer 

Oan  McNeill 

Written  in  a  lively  and  entertaining  style,  this  book  teaches 

everything  a  beginner  needs  to  know  to  get  started  quickly 

with  the  Amiga  from  Commodore.  You'll  learn  about  setting 

up  the  system,  some  of  the  most  popular  types  of  software, 

and  details  about  the  hardware. 

ISBN  0-87455-025-4 

$16.95 

Using  AmigaDOS 

Arlan  R.  Levitan  and  Sheldon  Leemon 
A  comprehensive  reference  guide  and  tutorial  to  the 
powerful  AmigaDOS— the  operating  system  underlying  the 
Workbench  and  intuition— this  book  offers  information 
useful  to  every  Amiga  owner.  AmigaDOS,  the  alternative  to 
the  icon-based  Workbench,  lets  you  control  the  computer 
directly.  Using  AmigaDOS  defines  and  illustrates  all  DOS 
commands,  and  shows  you  how  to  create  file  directories, 
access  peripherals,  and  run  batch  file  programs.  You'll  learn 
why  the  system  prompts  you  to  svi^p  disks,  and  how  to 
avoid  "disk  shuffle,"  The  screen-  and  line-oriented  text 
editors,  both  overlooked  in  the  user's  guide  which  comes 
with  the  Amiga,  are  explained  in  detail.  Numerous  examples 
and  techniques  show^you  how  to  use  AmigaDOS  to  make 
operating  your  computer  even  more  convenient.  A  full 
reference  section  details  each  DOS  command,  giving  you 
easy  access  to  the  complete  AmigaDOS. 
ISBN  0-87455-047-5 
S14.95 


BRING  THE  ATARI  ST  ALIVE 


Introduction  to  Sound  and  Graphics  on  the 
Atari  ST 

Tim  Knight 

The  ST,  Atari's  powerful  new  computer,  is  an  extraordinarily 

impressive  sound  and  graphics  machine.  Easy  to  use,  the 

ST  can  produce  color  graphics  and  sound.  You'll  find 

thorough  descriptions  of  the  computer's  at)ilities,  and  the 

information  needed  to  create  a  complete  sound  and  graphics 

system.  This  is  the  perfect  introductory  reference  to  sound 

and  graphics  on  the  Atari  ST. 

ISBN  0-87455-035-1 

$14.95 


LEARN  C 


From  BASIC  to  C 

Harley  M.  Templeton 

This  introduction  to  C  takes  you  by  the  hand  and  shows 
how  to  move  from  BASIC  to  this  increasingly  popular 
language.  BASIC  programmers  will  find  this  approach 
designed  just  for  them.  Early  chapters  discuss  C  language 
equivalents  for  common  BASIC  statements  and  the 
similarities  and  differences  between  BASIC  and  C.  Later 
chapters  teach  everything  you  need  to  know  to  write,  debug, 
and  compile  programs  in  C. 
ISBN  0-87455-026-2 
$16.95 


Visit  your  local  bookstore  or  computer  store  to  purchase  any  of  these  new,  exciting  books  from 

COMPUTE!  Publications.  Or  order  directly  from  COMPUTEr.  Call  toll  free  1-800-346-6767 

(in  KY  212-265-8360)  or  mail  your  check  or  money  order  (including  $2.00  shipping  and  handling  per 

book)  to  COMPUTE!  Books,  P.O.  Box  5038,  F.D.R.  Station,  New  York,  NY  1015D. 


COMPUTE!  Publications,  nc.^^ 

Oae  of  the  ABC  Publishing  Componpes  ^B 

ess  7tri  Avenue.  6tri  Floor,  New  Vol.  NV  10019 


COMPUTE!  books  are  available  in  the  U.K.,  Europe,  the  Middle  East,  and  Africa 
from  Holt  Saunders,  Ltd.,  1  St.  Anne's  Road,  Eastbourne,  East  Sussex  BN21 
3UI\i,  England  and  in  Canada  from  Hott.  Rinehart,  &  Winston,  55  Homer  *e., 
Toronto,  ON  M8Z  4X6. 


^ifco  Compuie/f  LMakkei'mq  9r  ComuOiainif^ 


^  JK  ATARI  JK  lapplGlCOMMODORE 


800XL CALL 

130XE  (NEW) CALL 

520ST  (NEWl CALL 

1050  Drive 165 

10)0  Recorder 42 

I  1020  Prinler 55 

1025  Prinler 159 

1027  Primer 179 

■  850  inierface 109 

I  ATARI 

'  VIP  Professional - 74.50 

ST  Companion 15.95 

ATARI  SOFTWARE  (NEW) 

Ccdewriier 35-75 

Filswriter 20.75 

Reportwfiier 20  75 

Menuwnter 20  75 

Home   Iniegrator 19  75 

Small  Bus    Inventory.-  .  11,75 

Salesman  Expenses 11.75 

Aces  Bee/Pay 11.75 

—  Retail  Invoice 11.75 

'Zi'  Final  Legacy 15.75 

—  Adventure  Wriler 18.75 

—  Star  Voyager 11.75 


BRODERBUND  (Atari) 

The  Prim  Shop 28-95 

Graph ics  Library 1 8.95 

Graphics  Library  II 19.50 

Banit  St.  Writer 42.75 

Whistler's  Brother ...18.95 

Spelunker 18.95 

Stealth 18.95 

Serpent's  Star 24.95 

Mask  of  the  Sun 24.95 

INFOCOM  (520ST) 

Wishbringer,. 28,95 

ZorkI 28,96 

Zorkll 31.95 

iZortdll 31  95 

i  Deadline 33,95 

^Starerass 33.96 

Suspect 31.95 

Suspended 33.95 

Cutttiroats 28.95 

Sea  Stalker 28.95 

Infidel 31.95 

Sorcerer, 31.95 

Enchanter .28.95 

Witness  28.95 

Planetlall 28.95 

I  SpellBreaker 33.95 

i       SPINNAKER 

:  Delta  Drawing  Room 19.95 

Cosmic  Life  Room 19.95 

Up  for  Grabs  Room 19.95 

PERSONAL  PERIPHERALS 

Super  Sketch  C-64 29.95 

Pnnlei  Utility  C-64 U.99 

Super  Sketch  Atari 25.95 

I  Super  Skelch  Appie/lbm 55.00 


MICROPROSE  (Atari) 

KennBOv  Apnroacri  21.75 

Crusade  in  Europe 24.75 

Decision  in  Desert 24.75 

Solo  Flight 20.76 

Nato  Commander 20.75 

Spitfire  Ace 18.76 

F.15  Strike  Eagle 20.75 

Hellcat  Ace 16.75 

Aerojet 21.75 

Silent  Sen/ice 21.75 

Gunshjp 21.75 

SSI  (Atari) 

Colonial  Conquest 24.75 

Field  of  Fire 24.75 

Kampfgruppe 36.75 

Objective;  Kursk 24,75 

Market  Garden 29.75 

Six  Gun  Shootout 24,75 

War  in  Russia 49.75 

Computer  Baseball 24,75 

Computer  Quarterback. .24. 75 

Gemstone  Warrior 22,75 

50  Mission  Crush 24,75 

Questron , 29,75 

HABA 

to  Megabyte- CALL 

Hippo  C  Compiler 49,95 

Check  Minder 49,95 

Business  Letters 36,95 

Wills 36,95 

SOFTECHNICS 

Timelink 75,00 

Rhythnn 3995 

MIRAGE  CONCEPTS 

EXPRESS 34,95 

SUB  LOGIC  (Atari) 

Fiight  Simulator  ll... 32.75 

Night  Mission  Pinball  ,,,20,75 


SCARBOROUGH  (Apple) 

NET  WORTH 48,76 

Improved  Masterlype 22,75 

Mastertype   Filer 22,75 

BRODERBUND  (Apple) 

The  Print  Shop 31,50 

Graphics  Lib'ary ..18,50 

Graphics  Library  II 18-95 

Paper   Refill 11-95 

Bank  St  Writer  64K 41.50 

Bank  St  Wriler  128K 42.75 

Bank  St  Filer 42.75 

Bank  St  Mailer 42.75 

Bank  St  Speller 42.75 

Carmen  Sandiego 22.75 

Karateka 22.75 

Captain   Goodnight 22.75 

Muppey  Cruise 25,75 

SUB  LOGIC  (Apple) 

Flight  Simulator  II, ...32.75 

Ni^l  Mission  Pinball 20,75 

MICROPROSE  (Apple) 

Crusade  in  Europe 25,75 

Decision  in  Desert 25,75 

F-15  Strike  Eagle,,. 21.75 

Nato  Commander 21.76 

AcroJet ....21.75 

Silent  Service 21.75 

Gunship 21.75 

SSI  (Apple) 

Mech  Brigade 36.75 

Norway  f985,. 22.75 

Markef^  Garden 29.75 

Six  Gun  Shootout 24.75 

50  Mission  Crush 24.75 

Phanlasie 24.75 

INNOVATIVE  CONCEPTS 

Flip.n.File  10 3.50 

Flip-n-File  16 825 


COMMODORE 

C-128  NEW ...CALL 

1571  Drive CALL 

1572  Drive CALL 

1902  Monitor CALL 

1670  Modem. CALL 

C-64  Computer CALL 

1541  Drive 189 

MPS801  Printer LOW 

1702  Monitor 199 

Simon's  Basic 24.75 

Assembler  64 34.75 

Super  Expander 22.75 

Logo  64 49.75 

Pilot  64 38.75 

EasyCale 34.75 

Easy  Script 38.75 

CARDCO 

Digitizer  Camera 189,95 

32K  Printer  Buffer -59,95 

Numeric  Keypad 34,95 

CB/5  5-slDt  Board(64), ,,,54,00 
CB/2  2.slot  Board(64) ,,,.25.00 

S'More  Basic  Flom 49.95 

Write  Now-64 36.00 

Mail  Now.64 29.00 

Spell  Now-64 29.00 

FiTe   Now-64 29.00 

Paint  Now-64 29.00 

Calc  Now-64 29.00 

Tax  Survival..., 29.00 

Super  Printer  Utlllly 27.95 

Wrile  Now-Vic-20 29.95 

SPINNAKER  (C-64ROM) 

Cosmic  Life  ROM. 19.75 

Jukebox 19.75 

Alphabet  Zoo 17.75 

Air  in  Color  Caves 19.76 

Up  for  Grabs 19.75 

Delta  Drawing 19.76 

Kids  on  Keys 16.75 

Kindercomp 14.75 

Pacemaker ..,.,..,,.,  17,75 

Fraction  Fever 17,75 


US  ROBOTICS 

Pus^lw.irfl  1200W  ??5 

PassMm  1200F  2?9 

Passimrt  300M  1 15 

PiissKtim  300F  1 11 

AutMiai;iJA  Sil 

PCM5  ^19 

PCHE4  519 

PCM256  75" 

S-100  T5 

Cairier  469 

MtfDlllrt  4&9 

Wmc  Us  DOS  n 

RACAL-VADIC 

r-f.-pi 
;jC3v 
isonpc 

3C0V 
300  PC 


5)9 
799 
559 
379 
201 


MODEMS 


HAYES 

SMARTMODEM   300.  IM 

SMARTMODEM   1200  377 

SMARTMODEM    1200B  Jl7 

SMARTMODEM  2400  ..596 

MICROMODEM  ME  135 


ANCHOR 

Volksmodem  55 

Volksmodem  12 186 

Mark  12 2S9 


TELE  LEARNING 

Toial  Telecommuncalions 

(C-W)  2995 

AP-250  (300  Baud  Appla)  69.95 

IS-SSO  (300  Baud  IBM)  69,95 

NOVATION 

IBM  30011200  MSOOS  eil     319 
IBM  300(1200  CPM«  ext        319 

IBM  aoo/taxwcc  ha        sss 

IBM  300I1200O40Q  MS-DOS  579 
IBM  MSJXIS  inl  325 

IBM  CPM«  ml.  325 

MdOTOlem  30(V1200  315 

MICROBITS 

lDr,JM(*rT  57 


MICROPROSE  (C-64) 

Kennedy  Approach 21.75 

Crusade  in  Europe 24.75 

Decision  in  Desert 24.75 

Solo  Flight 20.75 

Nato  Commander 20.75 

Spitfire  Ace 18.75 

F-15  Strike  Eagle 20,75 

Hellcat  Ace„„, 18,75 

Aerojet 21,75 

Silent  Service ,21,75 

SSI  (C-64) 

Colonial  Conquest 24,75 

Wings  ol  War 24,75 

Computer  Ambush 34,75 

Field  ol  Fire - 24,75 

Fighter  Command 36,75 

Kampfgruppe 36,75 

Mech  Brigade 36.75 

Market  Garden 29,75 

Six  Gun  Shootout 24.75 

Computet  Baseball 24,75 

Computer  Ouaf1erback,,24,7S 

Impetium  Galactum 24,75 

Phanlasie 24,75 

Cartels  &  Cutthroats 24,75 

50  Mission  Crush .24.75 

Questron 24.75 

BATTERIES  INCLUDED 

Paper  Clip 59,95 

Spell  Pak  , 34.95 

Consultant 59.95 

Paper  Clip 

wfSpell  Pak .„„75.95 

Home  Pak 34,95 

Bus  Card 129,95 

80  Column  Board 109,95 

BRODERBUND 

The  Print  Shop 28,75 

Graphics  Library 1 6.75 

Graphics  Library  1 1 ,..  19.75 
Graphics  Librarylll . .    19.95 

Karateka 19.75 

Casttes  Dr.  Creep. , .  19.75 

Bank  St,  Writer 32.75 

Loderunner 20;75 

Mask  of  Ihe  Sun 24.75 

Spelunker 19.75 

'.erpent's  Star 24.75 

■Vhistler's  Brother.. .  18,75 

aidBiingeling  Bay...  18.75 

SUB  LOGIC  (C-64) 

Flight  Simulator  ll... 32.75 

Nijhl  Mission  Pinball 20.75 


COMMODORE 

MPSIOOOPirnler         259 

C1350  Mouse  42 

C1700  128KF1AM 145 

C1750512KFIAM 269 

JANE    3S 

Perfect  Wnler 49 

Perfect  Calc 49 

Perfea  Filer  , 49 


TAXAN 

115  12"  Oreeen  CompeS'le    CALL 

116  12'  AmiMi  ComjxKiie     CALL 

121  12-  Green  TTL 135 

122  12-  AmiKiTTL 145 

220  H"  Cote  Conposte 259 

410  12- RGB  Hi  Res  IBM 329 

420  n-  RGB  Super  Hi  IBM 409 

440  12- BGB  UlSi  H:  nes.      555 
Till  Sland 35 

PRINCETON  GRAPHICS 

MAX. 12  Amber 165 

HX,12  RGB 46S 

SR-12  RGB S9S 


PANASONIC 

OTiSOOO  13'  ROaComiBsle..  247 
DTW140  14-  PGaOmposfle.  .329 
DTH103    10'  B3B  tt  Ffe        .395 

DTSiOi    10-  ComposBB 175 

DTICOOG  10-  Ff38 - 166 

TX1JH3Pt2-  Caor 419 

TR120U1PA  12-  Gfeei 109 

TB120MBPA  12-  Amber 109 

TB122M9P     iJ'GrtHilBAI 148 

TR122HVP     12-  Amber  BW    -  -148 

X-TRON 

ComcokK  I  Compostte  Gfeen..  177 


MONITORS 


SAKATA 

SG  1000  12"  Green  .  99 
SA  1000  32'  Amber .  .  .  l09 
SG  1500  12*  Green  TTL  n9 
SA  1500  12-  Amber  TTL,  129 
SC  TOO  13-  Color  Comp  209 
SC  200  iS"  RGB  33? 

STS1   Till  S:and  29 


ZENITH 

ZVM  122A   AmDer 
ZVM  123G  Green 
ZVM  124  AmlMrlBM 
ZVM  131  Caor      -  . 
ZVM  133  RGB 

75 
75 
1M 
275 
389 

ZVM  135  CompcKite 
ZVM  136  Hi  Res  Color 
ZVM  1J20 
ZVM  1230 
ZVM  1!40 

TEKNIKA 

f*U-10  Composite 
IUU-22  RGB 

449 
589 
95 
95 
149 

179 
255 

AMDEK 

300  Green  n. 

300  Amber  128 

310  Ambei  IBM  155 

Color  30O  Audio  234 

Color  SOO  Composite 369 

Color  600 , 397 

Color  700 495 

Color  710    569 

NEC 

ja,!?60  Green 95 

JB-1201  Green .,..135  i 

JC  1215  Color 235  i 

JC  1216  RGB 375 

JC  1460  Color 265 


LYCO  COMPUTER 
AMERICA'S  MAIL  ORDER  HEADQUARTERS! 


^yco  Compuie/{  uUa/(keimg  &  ComuStants 


^. 


SAVE  ■"=  PRINTERS 


1091. 


.$233 


AXIOM     SEIKOSHA 

GFrSOAT  lAlan) 222 

GPb50CD{C-64 12! 

GP700AT  (Alan) 439 

GP700AP  (Apole) 439 


ELITESCDt 


.229 


C.  ITOH 

ProWMor  asiOSpt 349 

1S50SP+ 489 

SlarWrilBC 769 

PnnlMaster 929 


TOSHIBA 

P1340  «9 

P3S1  + 1149 

P341P 969 

P341S 999 

351  Swel  Feeder 329 


CARDCO 

32K  BUFFEFl  ,{0-641 

CORONA 

LP300  Lasef  Printer   , 
200361   Toner  CaMndge 


EPSON 

FX65  iUen) 333 

U<80  212 

FX1S5  (Naw)  464 

LX90  (Nbo) 226 

SQ20CI0  (Wew) 1S55 

JXBO  467 

Hamewrrter    10 193 

CR20-Alan _ 153 

Cn-22<K>64 153 

DXtO  (Naw)       _        ,207 

0X20  (New) 297 

H&80  INsw) .  286 

LQlSOOP     975 

LQ1500S      1039 

HX.lOO        35B 

FXIDO.        CALL 


CITIZEN 

MSP-IO - 269 

MSP-15 358 

MSP-20 337 

MSP-eS  - 490 

Sheelldr  (10/20) 189 

Sneelldr  (1505) 199 


OKIDATA 

Okimaie  10.. i79 

Okimale  20 - CALL 

IB? 214 

192  ., 346 

193  - 563 

92P   349 

93P 56b 

84P,.  ,. 645 

92  Imabewriler 349 

'IBM  versions  aFso 


BROTHER 

HR.ISXL.P 359 

HRISXL-S 359 

HR.36P M9 

HR.35S „ _ 839 

2024L-P _ 949 

P/1009.P - 189 


JUKI 

Juki   6100 347 

RS232  Serial  Board   65 

6100  Trader 119 

6100  Sheel  Feeder  209 

Juki   6300  757 


LEGEND 


aso 

loaa 

1380 

1385 
LEGSMD  E 


..222 

.262 

296 

159 


DIGITAL  DEVICES 

16K  BUFFER 75 

32K   BUFFER 89 

e4K   BUFFER 125 

DIABLO 

D25 549 

630  API - 1599 

630  ECS 1759 

0  80  IF  2395 

P32C01 

P3a  1749 

C  150  999 

DX  35  (NEWJ  CALL 

AP.8D  CALL 


STAR  MICRONICS 

SG-10 208 

SG-16 373 

SD-lO  336 

SD15  442 

SR-lO  463 

Sn-15  583 

SB  10  596 

Power  Type.  303 

SG.IOC*!  (fJEWl  CALL 


DUST  COVERS 

Atari 

5Z0ST 11.95 

130XE 5-99 

800XL 6-99 

1(K0  6.99 

1025  799 

Commodore 

Cl28 7.99 

157U1S41 699 

1902 1095 

170!, 899 

C84Alic2a 699 

Panasonic 

1090/1091  899 

1092  899 

1093 999 

Slar  Micronics 

SQ'SDlO  B.99 

Se/SDl5 9.99 

SRlO 9.99 

SR15 -- 9.99 

Okidaia 

8?J92 8.99 

83/93 999 

193 999 


DRIVES 


INDUS 

GT  ATARI 215 

QT  COMMODORE 235 

COMTEL 

Enhsncer  2000  (c«) 179 

TANDON 

320K  %  '.'«•■  Drive  n5 

TYMAC 

WOCWO  3'i-  *K*  3r^e  64»:      289 

MSD 

SDl  Drive  (C-64) 229 

SD2  Drive  (C-64J 46S 


PRINTER 
INTERFACING 


AXIOM 


AT846  lAtaril  .  . 
Parallax   (C-S-l) 


.,65 
65 


MICROBITS 


MPP-1150  (Alari) 54 

MPP  115QXL  (Atari)  ,        .69 

MicroPriiil  (Alari) 39 

64K  RAM  Board  (600x1)       65 

DIGITAL  DEVICES 

ApeFace  XLP  (Ataii) 49 

ApeFace  12XLP  (1200x1)     49 
U-Prinl  A  (Alan).  54 

U-Prini  C  (C-64)  49 

UPrinl  A16K  Buffer 74 

U-Print  A64K  BuHer  ,99 

U-Print  AP16K  (Applel  99 

U-Print  AP64K  (Apple)    .     139 
U-CALL  RS232  (Afarij       ,  ,37 

MICROTEK 

Dumpling  GX  (Apple)         .59 
Dumplinn  16K  (Apple)  39 

RV-6nCr  (Apple) 49 

TYMAC 

Connection  (C-6'1) 55 

Tackier  (Apple)  49 

PPC-iOO  (Apple)  39 

ORANGE  MICRO 


GRAPPLER+    (Apple) 
"     ,.       16K  lAppre) 
ORANGE   (Apple) 


,85 
149 
,59 

79 


Grappler  16K  (Apple)', 
ORANGE   (Apple) 
Grappler  CD  tC-64) 

CARDCO 

G-Wiz  (C-64) 54 

C/7  +  G  (C-64)     45 

C/?PS   IC-64)    49 

C/'B   1<;.64)                             .39 
C/?AT   (Alari),  49 

C/''AP  (Apple) 49 


DISKETTES 


DENNISON 

ELEPHANT  5- J'  SSSD  11  9<: 
ELEPHANT  5'i'  SSDD  1299 
ELEPHANT  5'i"'  DSDO  .14.99 
PREMIUM  5U-  SSDQ  .1399 
PREMIUM  5'j     DSDD   .    1599 

SUNKVONG 

SKC  SV."  SSOD  1199 

SKC  6Vi-  DSDD 13.99 

MAXELL 

S'/i'    MDl 13.99 

S'j     MD2  19  99 

VERBATIM 

5Vi-  SSDD        1399 

5'/i-    DSDD 19.99 

BONUS 

5V,-    SSDD  9.99 

S'-'t"    DSDD  ,12  99 


NO  LABEL  DISKETTES 

Ml  5'A"  SSDD... 10.99  (Box  10) 
NL  5VV  DSDD... 15.99  (Box  10) 

■Free  Diskette  Writer  Pen! 

"Free  Storage  Case! 


IBM-PC 

SOFTWARE 


* LOTUS 

Lotus  1-2-3 309.00 

Symptiony ..439.00 

'QUADRAM 

Quad  Jr.  Exp  Chassis  .519.00 
Qi^ad  Jr.  Eip.  Memory  ...209,00 
Quad  Memorv  Jr 209.00 

ITT  XTRA  XP  Personal  Computer! 
•256K   2  Drire  S>aeni  CALL 
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COMPUTE!  books  are  available  in  the  U.K.,  Europe,  the  fMiddle 
East,  and  Africa  from  Holt  Saunders,  Ltd.,  1  St.  Anne's  Road,  East- 
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Train  for  the  Fastest  Growing  Job  Skill  in  America 

Only  NRI  teaches  you  to  service  and 
repair  all  computers  as  you  build 
your  own  IS-blt  IBM-compatible 
micro 


As  computers  move  into 
offices  and  homes  by  the  millions, 
the  demand  for  trained  computer 
service  technicians  surges  forward, 
The  Department  of  l^ibor  estimates 
that  computer  service  jobs  will  actually 
double  in  the  next  ten  years— a  faster 
growtli  than  any  other  occupation. 

Total  System  Training 

As  an  NRi  student,  you'll  get  total 
hands-on  training  as  you  actually  build  your 
own  Sanyo  .\1BC-55t)  series  computer  from 
the  keyboard  up.  Only  a  persoti  who  knows 
alUhe  underlying  fundamentals  can  cope 
with  all  the  significant  brands  of  computers. 
And  as  an  NRI  graduate,  you'll  possess  the 
up-to-lhe-minute  coml)ination  of  theory  and 
practical  experience  that  will  lead  you  to 
success  on  the  job. 

You  learn  at  your  own  con\'enience,  in 
your  own  home,  at  your  own  comfortable 
pace.  Without  classroom  pressures,  withoul 
rigid  night-.school  .sctiedules, 
without  wasted  time.  Your  own 
personal  NRI  instructor  and  NRI's 
complete  technical  staff  will 
answer  your  questions,  give  you 
guidance  and  special  help 
whenever  you  may  need  it. 


The  Exciting  Sanyo 
16-bit  IBM-compatible 
Computer— Yours  To  Keep 

Critics  hail  the  new  Sanyo  as 
the  "most  intriguing"  of  all  the  ■*■ 

IBM-PC  compatible  computers,  ll  uses  the 
same  8088  microproccs.'ior  as  the  IBM-PC 
and  the  MS/DOS  operating  system.  So,  you'll 
be  able  to  choose  thousands  of  off-theshelf 
software  programs  to  run  on  your  compfefed 
Sanyo, 

As  you  build  the  Sanyo  from  the 
keyboard  up,  yoLi'll  perform  demonstrations 
and  experiments  that  will  give  you  a  total 
masten'  of  computer  operations  and 
servicing  techniques.  You'll  do  programming 
in  BASIC  language.  You'll  prepare  interfaces 
for  peripherals  such  as  printers  and  joysticks. 
Using  utility  programs,  you'll  check  out  8088 
functioning.  NRI's  ea.sy  step-by-step 
directions  will  guide  you  all  tfiie  way  right 
into  one  of  today's  fastest  growing  fieids  as  a 
computer  service  technician.  And  the  entire 


system,  including  all 
the  bundled  software 
and  extensive  data 
manuals,  is  yours  to 
keep  as  part  of  your 
training, 

100-Page  Free 
Catalog  Tells 
More 

Send  the  postage-paid  repls'  card  today 
for  NRI's  big  lOO-page  color  catalog,  which 
gives  you  all  the  facts  about  NRI  training  in 
Microcomputers,  Robotics,  Data  Com- 
munications, TV/ Video/ Audio  Sen/icing, 
and  other  grow-ing  high-tech  career  fields, 
tf  the  card  is  missing  \wite  to  NRI  at  the 
address  beiow. 


NRI  is  ttie  only  tiome 
study  school  that 
trains  you  as  you 
assemble  a  lop- 
brand  micro- 
computer. After 
building  your  own 
logic  probe,  you'll 
assemble  the 
"intelligent" 
Iteyboard. , , 

. ,  .then  install 
the  computer 
power  supply, 
checking  all  the 
circuits  and 
connections  with 
NRI's  Digital 
Multimeter.  From 
Itiere  you'll  move 
on  to  Install  the 
disk  drive  and 
monitor. 


Your  NM  course  includes  a  Sanyo  16-bil 
microcomputer  wilti  128K  RAM,  monitor, 
double-density/  double-sided  disk  drive,  and 
"Intelligent"  Keyboard;  The  NRI  Discovery 
Lab,  Teaching  Circuit  Design  and  Operations; 
a  Digital  Multimeter;  Bundled  Spread  Sheet 
and  Word  Processing  Software  Worth  over 
$1000  at  Retail— and  More. 


McGraw-Hill  Continuing  Education  Center 

3939  WLstoiLsin  Avenue,  NW 
Washington.  DC  20016 
We'll  Give  You  Tomorrow. 

IBM  is  3  Registered  Trademark  of  International 
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Quantum  leap 

From  6502  To  68000 


Richard  Mansfield,  Senior  Editor 


A  new  era  is  dawning 
for  machine  language 
progrannnners  on 
personal  computers. 
Thanks  to  the  extra 
power  of  the  68000 
microprocessor,  the 
iatest-generation 
computers  can  offer 
such  advanced 
features  as  super  high- 
resolution  graphics, 
multitasl<ing, 
megabytes  of  main 
memory,  and 
processing  speed 
comparable  to  the 
mainframe  computers 
of  just  a  few  years  ago, 
Here's  an  introduction 
to  this  fascinating  chip. 


The  venerable  6502  micro- 
processor chip,  which  has  been 
the  brain  of  the  majority  of  per- 
sonal computers  for  a  decade,  is  in 
the  twilight  of  its  life.  The  new  gen- 
eration of  machines — Commo- 
dore's Amiga,  Atari's  ST,  and 
Apple's  Macintosh — is  built  around 
the  68000  chip.  Compared  to  the 
6502  and  its  relatives,  the  68000  is 
significantly  more  powerful  in  the 
two  ways  that  count:  memory  and 
speed. 

At  their  most  elementary  level, 
computers  spend  most  of  their  time 
getting,  sending,  and  manipulating 
numbers.  Even  characters  of  the  al- 
phabet are  coded  in  the  computer 
as  numbers.  To  display  a  message, 
for  example,  the  computer  fetches  a 
number  from  memory  and  sends  it 
to  the  screen,  then  fetches  the  sec- 
ond number  and  sends  it,  repeating 
this  get-and-store  process  until  it 
has  sent  the  entire  message.  Clear- 
ly, the  more  memory  you  can  gulp 
at  a  time,  the  faster  you  can  manip- 
ulate numbers  and,  by  extension, 
the  better  you  can  compute. 

Capable  of  directly  addressing 
16  megabytes  (16,384K  or 
16,777,216  bytes),  the  Motorola 
68000  greatly  exceeds  the  address- 
ing power  of  the  MOS  Technology 
6502,  which  can  only  address  64K 
(65,536   bytes).    Some   computers 


with  6502  or  6502-compatible 
chips — such  as  the  Commodore 
128,  Apple  lie,  and  Atari  130XE— 
get  around  this  limitation  by 
switching  back  and  forth  between 
banks  of  memory,  but  at  a  cost  in 
speed  and  programming  flexibility. 
The  68000  can  also  be  driven 
at  clock  speeds  of  8  megahertz 
(MHz)  and  higher,  while  most  6502 
machines  run  at  1  MHz.  (Again,  the 
Commodore  128  and  Atari  comput- 
ers are  exceptions;  the  128  can  be 
switched  to  2  MHz  if  no  peripherals 
are  being  accessed,  and  Atari  ma- 
chines normally  run  at  nearly  2 
MHz.)  Both  the  larger  addressing 
and  faster  speed  capabilities  of  the 
68000  contribute  to  a  significant 
gain  in  overall  computing  power. 
You  can  hold  more  data  in  a  68000 
machine,  and  you  can  process  it 
faster. 


One  of  the  first  things  any- 
one wants  to  know  about  a 
new  computer  language  is 
what  commands  or  instructions  are 
available.  The  68000  offers  pro- 
grammers plenty  of  power.  If 
you're  coming  to  this  chip,  as  most 
of  us  are,  from  6502  computers — 
Apples,  Commodores,  Ataris,  and 
others — it's  quite  a  liberating  expe- 
rience. The  68000  has  roughly  the 
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same  number  of  addressing  modes 
as  the  6502,  but  that's  where  the 
similarity  ends. 

For  example,  many  of  the  6502 
instructions  are  contained  in  the 
single,  multipurpose  68000  com- 
mand MOVE.  The  6502's  LDA, 
LDX,  LDY,  STA,  SIX,  STY,  TAX, 
TAY,  TXA,  and  TYA  instructions 
are  all  subsumed  into  MOVE.  What 
makes  this  work  is  that  the  address- 
ing modes  for  many  68000  instruc- 
tions are  dual-purpose:  They 
specify  both  the  source  and  destina- 
tion of  a  transfer.  Since  most  com- 
puter activity  involves  moving 
values  around  and  manipulating 
them,  the  efficiency  of  MOVE  is 
most  desirable. 

Here's  how  it  works:  If  you 
want  to  transfer  the  number  held  in 
address  8000  to  address  9000,  the 
single  instruction  MOVE.B 
8000,9000  fetches  the  value  and 
stores  it  in  the  new  location.  There's 
no  intermediate  step  as  there  would 
be  when  moving  a  byte  with  the 
6502— LDA  8000:STA  9000. 

Because  the  6502  is  an  eight- 
bit  chip — it  can  handle  only  eight 
bits  of  information  at  a  time — ma- 
chine language  on  the  Commodore 
64  and  other  6502  computers  often 
requires  the  programmer  to  fabri- 
cate special  subroutines  to  incre- 
ment, decrement,  compare,  or 
perform  math  on  double-byte  (16- 
bit)  numbers.  While  there  are  only  a 
few  such  routines  necessary  and 
they  can  be  plugged  into  a  program 
relatively  easily,  it  is  still  desirable  to 
have  the  68000's  single-instruction 
command  over  multibyte  manipula- 
tions. 

What's  more,  if  you  want  a 
loop  to  access  a  whole  range  of 
memory,  there  are  addressing 
modes  which  automatically  incre- 
ment and  decrement  in  one-,  two-, 
or  four-byte  steps,  Speciali2ed 
moving  is  also  provided  for  with 
such  instructions  as  EXG,  which  ex- 
changes registers  so  you  don't  have 
to  move  A  to  C,  B  to  A,  and  C  to  B 
just  to  exchange  A  with  B.  The 
SWAP  instruction  swaps  the  low 
and  high  words  within  a  32-byte 
data  register.  MOVEM  moves  the 
values  in  a  cluster  of  registers  to  or 
from  memory  which,  among  other 
things,  allows  you  to  save  and  re- 
store all  the  data  and  address  regis- 
ters and  flags  with  this  single 
instruction. 


More  than  a  dozen  of  the 
68000's  instructions  are 
the  same  as  the  6502's: 
JSR,  RTS,  NOP,  JMP,  CMP,  etc.  On 
the  68000,  they  just  work  with  larg- 
er numbers  when  necessary.  But 
there  are  other  instructions  that, 
while  named  differently,  accom- 
plish tasks  with  which  all  program- 
mers are  familiar.  ADD,  SUB,  MULS, 
and  DIVS  perform  arithmetic.  There 
are  14  branching  instructions,  rang- 
ing from  old  friends  like  BCC  and 
BEQ  to  new  ones  like  BLT  (less 
than),  BLE  (less  than  or  equal),  and 
BGE  (greater  or  equal).  However, 
you  can  branch  from  —32766  to 
-1-32769  bytes  rather  than  the 
-127  to  -t-128  range  of  the  6502, 

Where  the  6502  has  only  three 
eight-bit  registers.  A,  Y,  and  X,  the 
68000  features  eight  data  registers 
and  seven  address  registers,  each 
32  bits  large.  What's  more,  these 
registers  can  be  used  in  a  variety  of 
ways  for  a  variety  of  purposes. 
What's  possible  with  data  register 
DO  is  possible  with  any  of  the  other 
seven  data  registers.  That  flexibility 
is  not  the  case  with  A,  Y,  and  X  on 
the  6502. 

The  68000's  data  registers  can 
work  with  bytes,  words  (two  bytes 
ganged  together),  or  long  words 
(four  bytes).  The  address  registers 
work  only  with  words  and  long 
words.  The  various  addressing 
modes,  in  conjunction  with  the 
multiplicity  of  registers,  allow  for 
considerable  speed  and  many 
modes  of  transport  between  regis- 
ters or  memory.  In  addition,  such 
things  as  multiplication  and  divi- 
sion are  built  into  the  chip  itself  and 
do  not  have  to  be  constructed  as 
routines  or  macros  as  they  do  when 
working  with  the  6502. 

What  do  you  need  to  get  start- 
ed with  68000  programming?  If 
you're  thinking  of  making  the 
crossover  from  6502  to  68000, 
you'll  find  the  instruction  set  and 
addressing  modes  described  in  de- 
tail in  several  books  currently  avail- 
able. You'll  also  need  an  assembler. 
At  this  writing  (late  fall),  assem- 
blers are  available  only  from  the 
computer  manufacturers,  usually  as 
part  of  professional  software  devel- 
opment packages.  But  by  early 
1986,  alternative  assemblers  from 
independent  companies  should  be 
available. 

Because  of  such   features   as 


multiple  screen  windows,  multi- 
tasking operating  systems,  and  oth- 
er aspects  of  these  new  machines, 
memory  allocation  is  not  static  as 
on  earlier  computers.  The  familiar 
technique  of  calling  operating  sys- 
tem hooks,  like  the  Kemal  on  previ- 
ous Commodore  computers,  does 
not  work  quite  the  same  way  on  the 
ST,  Anniga,  and  Macintosh.  For  ex- 
ample, on  any  Commodore,  from 
the  earliest  PETs  to  the  most  recent 
Commodore  128,  you  could  always 
JSR  $FFD2  to  print  whatever  was  in 
the  accumulator.  On  the  new  com- 
puters, however,  your  program 
needs  to  go  through  the  operating 
system  to  make  itself  known  to  the 
screen. 

For  instance,  if  two  Amiga 
windows  are  concurrently  running 
two  programs  and  you  want  to  put 
something  on  the  screen,  you  need 
to  follow  the  rules  of  Intuition,  the 
Amiga's  operating  system,  to  send 
your  message.  In  this  way,  machine 
language  begins  to  resemble  as- 
pects of  C  or  other  higher-level  lan- 
guages. You  need  to  involve 
libraries  and  lists  of  equates  to  com- 
municate with  your  computer,  par- 
ticularly when  input/output  is 
involved. 

Another  consequence  of  the 
dynamic  memory  allocation  in 
these  new  computers  is  that  you 
must  write  your  machine  language 
programs  to  be  completely  relocat- 
able— capable  of  floating  about 
anywhere  in  memory,  without  be- 
ing dependent  on  fixed  memory  ad- 
dresses. Fortunately,  the  68000 
includes  a  powerful  set  of  relocat- 
able branching  instructions,  such  as 
BSR  (Branch  to  SubRoutine).  Some 
assemblers  can  even  change  your 
address-specific  source  code  into 
Program  Counter-relative,  and  thus 
relocatable,  object  code.  And  since 
the  computer's  operating  system 
determines  where  your  program 
will  reside,  there  is  less  worry  about 
memory  conflicts. 

As  our  computers  grow  in- 
creasingly complex,  there  are  some 
additional  techniques  to  master  in 
machine  language  programming. 
But  the  power — and,  in  a  strange 
way,  the  simplicity — of  the  68000 
chip  more  than  makes  up  for  any 
temporary  inconveniences.  A  new, 
larger  world  is  opening  up  for  the 
machine  language  programmer  who 
wants  to  accept  the  challenge.      © 
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Reach  For  The  Stars  For  Commodore  And  Apple 


James  V.  Trunzo 

Requirements:  Commodore  64  or  128  with 
a  disk  drive;  or  an  Apple  U-series  com- 
puter with  at  least  64K  RAM  and  a  disk 
drive. 


Galactic  conquest  is  the  theme  of  many 
a  computer  game,  and  quite  a  few  of  the 
more  recent  attempts  have  been  solid 
efforts.  A  new  title.  Reach  for  the  Stars,  is 
a  particularly  fine  simulation  of  galactic 
exploration,  combat,  and  conquest. 

Reach  for  the  Stars  can  be  played  by 
up  to  four  players  in  any  combination 
of  computer  or  human  opponents.  Each 
player  must  explore  new  star  systems, 
colonize  any  planets  that  seem  promis- 
ing, allocate  resources,  and  establish 
policies  and  strategies  that  take  into 
consideration  such  diverse  factors  as 
environment,  civil  harmony,  defense 
against  inevitable  alien  attacks,  and  in- 
dustrial expansion. 

This  game  is  special  because  play- 
ers must  maintain  delicate  balances  to 
win.  You  can't  build  a  huge  armada  at 
the  expense  of  social  programs,  or  else 


your  colonies  will  suffer  riots,  sabotage, 
disease,  and  a  lower  birth  rate.  Like- 
wise, to  be  overly  concerned  with 
strengthening  existing  planets  while  ig- 
noring exploration  and  colonization  al- 
lows other  players  to  establish  strong 
bases  near  your  home  planet,  bases 
which  will  eventually  build  warships 
and  attack  your  home  colony.  Strategy 
is  quite  important  in  Reach  for  the  Stars. 

Beware  The  Plague 

Each  turn  of  the  game  involves  a  num- 
ber of  phases:  production,  movement, 
combat,  planetary  conquest,  etc.  Each 
phase  is  handled  with  full-screen  dis- 
plays and  keyboard  controls  which  are 
efficient  and  easy  to  use.  To  make  the 
game  easier  to  learn,  there's  a  complete 
tutorial  game  as  well  as  an  excellent 
rule  book. 

Reach  for  the  Stars  is  impressively 
realistic  thanks  in  part  to  the  great  num- 
ber of  interacting  options  and  factors. 
There  are  such  events  as  the  threat  of  a 
star  going  nova,  obliterating  everything 
in  the  star  system;  a  sudden  influx  of 
solar  debris,  hampering  your  welMaid 
movement  plans;  or  plague  and  famine. 


weakening  your  key  colony. 

When  played  against  the  com- 
puter. Reach  for  the  Stars  demands  that 
you  remain  constantly  aware  of  all  as- 
pects of  the  game,  allocating  Produc- 
tion Points  wisely  in  an  effort  to 
increase  your  technological  level,  to 
produce  the  best  warships,  and  so  on. 
When  played  against  human  oppo- 
nents, the  game  makes  the  same  de- 
mands, but  brings  out  an  additional 
element:  diplomacy,  and  a  nasty  com- 
panion, treachery.  Players  may  make 
agreements  with  each  other,  granting 
safe  passage  through  their  star  systems; 
or  they  can  gang  together  and  declare 
war  on  an  opponent  who  appears  to  be 
growing  too  powerful  too  quickly. 

Reach  for  the  Stars  combines  an 
extremely  playable,  efficient  game 
structure  with  a  sophisticated  simula- 
tion. It's  one  of  the  better  games  on  the 
market  this  year. 

Reach  for  the  Stars 
Strategic  Studies  Group 
Distributed  by  Electroitic  Arts 
1755  Campus  Drive 
San  Mateo,  CA  94403 
$45 


PC/lnterComm 
For  Atari  520ST 

George  Miller 

Assistant  Technical  Editor 

Requirements:  Atari  520$T  computer  and 
a  compatible  modem. 

PC/InterComm  is  more  than  the  first 
commercial  terminal  program  market- 
ed for  the  Atari  520ST.  It's  also  one  of 
the  most  versatile  and  easiest  terminal 
programs  we've  ever  used.  All  types  of 
communications  are  a  snap,  and  the 
looseleaf  manual  is  written  in  a  very 
clear  and  concise  manner. 

With  its  wide  range  of  features, 
PC/IiiterConun  won't  be  quickly  out- 
dated. As  well  as  easy  communications 
with  commercial  information  services. 


remote  databases,  electronic  bulletin 
boards,  and  other  personal  computers, 
its  terminal  emulation  mode  lets  the 
520ST  emulate  the  popular  DEC  VT102 
and  VTIOO  terminals  for  linkups  to 
DEC  mainframes  and  any  of  the  hun- 
dreds of  machines  running  the  Unix 
operating  system  with  3270  protocol 
converters. 

PC/lnterComm  allows  you  to  select 
baud  rates  from  50  to  19,200  bits  per 
second  (bps).  Of  course,  the  higher 
rates  are  beyond  the  capabilities  of  to- 
day's personal  computer  modems,  but 
they  do  allow  high-speed  computer-to- 
computer  transfers  of  data  via  null  mo- 
dem cables.  We  did  most  of  our  testing 
on  the  CompuServe  Information  Ser- 
vice with  a  Hayes  Smartmodem  1200. 

If  you  have  any  telecomputing 
experience  at  all,  you'll  probably  find 
yourself  online  and  communicating 
within  minutes  of  running  PC/lnter- 


Comm. It's  not  strictly  necessary  to  thor- 
oughly read  the  manual  before  getting 
started;  help  menus  and  on-screen  in- 
structions are  available  for  every  func- 
tion in  the  program. 

Automatic  Telecomputing 

Customizing  PC/lnterComm  is  easy, 
too.  Just  follow  the  instructions  from 
the  manual  or  the  help  menus  to  select 
baud  rates,  stop  bits,  parity,  and  other 
necessary  settings.  You  can  even  cus- 
tomize your  copy  of  PC/lnterComm  to 
automatically  dial  your  favorite  bulletin 
board  or  service  as  soon  as  the  program 
runs. 

Once  you've  set  up  the  parameters 
for  communicating  with  a  particular 
system,  you  can  save  the  information  in 
a  special  file  on  disk.  In  the  future,  you 
won't  have  to  remember  these  settings 
or  refer  to  the  instructions  each  time. 

For  file  transfers  (uploading  and 
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240K  Apple  Compatible 
®  Computer  System  9^ 


APIus  3000  computer  system  Includes  192K  RAM.  48K  ROM 
(33K  Microsoft  Basic  plus  16K  ROM  Emulator),  160K  Laser 
5%"  Disk  Drive  (Runs  Apple  II  Software),  Magic  Window 
Wordprocessor,  MagiCalc  spreodsheet.  Magic  Memory 
Database.  All  for  only  $399.00 


Complete  Syst&m 


•  15  Day  Free  Trial 


$399 


00 


a 


<?*C'WiWDOW// 


Aplus  3000 
System 


99 


tP/Ut  CARTRIDGE 
PORT 


I  PRINTER 
INTERFACE 

i  DISK  DRIVE 
CONTROLLER  INTERFACE 


POWER 
SWITCH 


•  COMPOSITE  VIDEO 

CASSETTE 
INTERFACE 


""riftwo'* 


Double  Immediate  Replacement  Worranty 

If  any  of  the  Aplus  3000  computer  system 
equipment  fails  due  to  faulty  workmanship  or 
material  within  180  doys  of  purchase  we  wilt 
REPLACE  it  immediately  with  no  service  charge!  ! 


•  Over  10,000  existing  Apple'  programs  •  Centronics  printer  interface  Included 

•  240K  <142K  RAM,  48K  ROM)    •  ArtScl's  Magic  Window  11,  Magic  Memory,  and  MagiCalc  included 

•  UOKLaser  5% "  Disk  Drive  (Runs  Apple  II  software)  *  RGB  (80  columns  in  color)  and  composite  included 

SPECIFICATIONS 

A  plus  3000  is  a  complete,  sett-contained  computer  based  on 
the  popylar  6502A  microprocessor  gnd  con  tap  into  the 
tremendous  software  library  of  Apple  II.  Features  include 
192K  Bytes  RAM,  32KB  Enhanced  Microsoft  BASIC.  80  column 
text.  560H  X  192V  color  graphic  disploy,  81  key  sculptured 
keyboard  and  high  efficiency  switching  power  supply.  Also 
included  os  standard  ore  Centronics  bus  printer  interface. 
Cassette  interfoce,  4  chonnel  sound  generotor,  and  5'/." 
Apple  Compatible  Disk  Drive. 

•  TEXT 

—  "10  columns  X  24  rows  or  80  columns  X  24  rows  softwore 
selectable. 

—  5X7  characters  in  7  X  8  matrix, 

—  Upper  and  lower  case  characters. 

—  One  of  Eight  colors  for  characters/grophics  and  background. 
Red,  Green,  Blue,  Cyon,  Magenta,  Yellow,  Block  and  White. 

—  Chorocler  set  with  normal,  inverse  and  flashing  capobilities. 

•  GRAPHICS 

—  280H  X  192V  6  colors  —  Black.  White,  Violet,  Green.  Blue.  Orange. 

—  280H  X  t92V  8  colors  bit  image  —  Black,  White,  Red,  Green,  Blue,  Cyon, 
Mogento,  Yellow. 

—  560H  X  192V  6  colors  —  Black,  While,  Violet,  Green,  Blue,  Orange.  (High 
resolution  color  monitor  required) 


More  Features  than  Apple-  for  less  than  Commodore^ 

Commodore 

Features 

Aplus  3000 

Apple  lie 

C-128 

RAM 

IMK 

64K 

128K 

Runs  Apple  II  Software 

r«i 

Yes 

No 

Function  Keys 

24 

None 

16 

4  Voice,  6  Octave  Sound 

Tei 

No 

Yes 

Composite  Video 

Yes 

Yes 

Yes 

Disk  Drive 

included 

Extra  Cost 

Extro  Cost 

Numeric  Keypad 

included 

Extra  Cost 

Included 

Video  Coble 

included 

Extro  Cost 

Extro  Cost 

RGB  Color  Card 

Included 

Extro  Cost 

Included 

80  Column  Cord 

included 

Extra  Cost 

Included 

Centronics  Printer  Interface 

included 

Extra  Cost 

Extro  Cost 

Drive  Controller 

Included 

Extra  Cost 

Included 

SI  SO  Wordprocessor  (Magic  Window) 

included 

Extra  Cost 

Extra  Cost 

$150  Spreadsheet  (MogiColc) 

included 

Extro  Cost 

Extra  Cost 

$60  Database  prg.  (Mogic  Memory} 

Your  Cost 

included 

Extra  Cost 

Extro  Cost 

$399.00 

$1745.00 

$1117.90 

Super  Apple  Compatible  Disk  Drive  Sale  $149.95. 

Quieter,  Cooler,  Better  Disk  Drives  for  your  Apple  II  plus,  lie.  He 
(specify  when  oraering).  List  $299.95.  Sale  $149.95. 


15  Day  Free  Trioi  —  If  it  doesn't  meet  your  expectations 

within  15  days  of  receipt,  just  send  it  back  to  us  UPS 

prepaid  and  we  will  refund  your  purchase  pricell 


ACCESSORIES 

2nd  Disk  Drive 

2  professional  analog  joysticks 

Z-80  cart,  allows  CP/M  use 

R5232  adapter 

R/F  Modulator  (TV  hookup) 

RGB  cable  (RGB  Monitor  tiookup) 

Centronics  cable  (for  Centronics  printer) 

Technical  reference  monuol 

Comsfor  lOx  1  20-1  40  CPS  dot  motrix  printer   S399.00 

80  columns  Hi-Res  Amber  Monitor  SI  99.00 

80  colunnn  Hi-Res  RGB  Monitor  S399.00 


LIST 

S299.95 
S  39.95 
99.95 
99.95 
29.95 
24.95 
34.95 
29.95 


SALE 

S149.95 

S   24.95 

59.95 

59.95 

19.95 

19,95 

24.95 

19,95 

$179.00 

$   89.95 

$259.00 


Add  $2S.O0  for  shipping  and  handling!! 

Enclose  Cashiers  Check.  Money  Order  or  Personal  Check,  Allow  14 
days  lor  delivery.  2  to  7  days  tor  phone  orders.  1  day  express  moil ! 
We  accept  Viso  and  MasterCard-  We  ship  C.O.D.  to  conlinental 
U.S.  addresses  only.  Add  Si  0  more  if  C.O.D. 


APPLE  ond  COMWODOBE  Of B  f #gi»1*(«d  tf od»morl»t  ot  AppI*  CompuUf  Inc ,  ond  CommodofB  Buiinasi  Machirtet  fnc, .  lAtpflctivalv 


COMPUTER  DIRECT 

We  Love  Our  Customers 

22292  N.  Pepper  Rd.,  Barrington,  III.  60010 

312/382-5050  to  order 


downloading),  several  different  error- 
checking  protocols  are  available.  Mo- 
dem? or  XMODEM  is  probably  the 
most  useful,  since  it  has  become  practi- 
cally a  standard,  but  you  can  also  select 
from  Kermit,  Kermit  Image,  ASCII, 
Raw,  and  a  proprietary  protocol  called 
Inter-PC/InterComm  for  exchanging 
files  with  another  computer  running 
PC/hiterComm.  All  of  these  protocols 
are  explained  in  the  manual.  Screen 
messages  keep  you  informed  of  what's 
happening  during  the  file  transfer. 

PC/InterComm  also  lets  the  com- 
puter dial  a  database  automatically  at  a 
predetermined  time,  then  automatically 
upload  or  download  files  without  hu- 
man intervention.  Just  follow  the  easy 
instructions  in  the  manual,  then  go  to 
sleep  if  you  like  and  let  your  ST  do  the 
work  during  the  night  when  communi- 
cations rates  are  lowest. 

The  only  drawback  to  PC/lnter- 
Comm  is  that  you  can't  exit  to  the  GEM 
desktop  and  then  reenter  the  program 
without  rebooting  it.  For  example,  it 
would  be  nice,  before  downloading,  to 
view  a  disk  director}'  from  the  desktop 
to  make  sure  there's  enough  room  on 
the  disk.  Since  the  program  ivon't  let 
you  move  back  and  forth  from  the 
desktop,  and  since  it  lacks  a  directory 
command  of  its  own,  you  can't  easily 
obtain  this  information. 

In  all  other  respects,  however, 
PC/InterComm  is  a  valuable  program 
that's  worth  taking  a  look  at. 

PC/InterComm 
Mark  of  the  Unicorn 
222  Third  Street 
Cambridge,  MA  02142 
$124 


Write  'n  Spell 


Tony  Roberts,  Production  Director 

Requirements:  IBM  PC,  PCjr,  or  compati- 
ble with  at  least  256K  memory  and  one 
disk  drive. 


Finding  a  full-featured  word  processor 
for  an  IBM  PC  or  PCjr  that  doesn't  cost 
a  fortune  has  been  a  difficult  task. 
Home  users  of  the  IBM  line  have  often 
been  forced  to  pay  business  prices  for 
good  word  processing  software.  Now, 
however,  there's  Write  'n  Spell  from 
Professional  Software.  This  program 
provides  considerable  power  at  a  mod- 
erate cost. 

In  addition  to  offering  nearly  every 
word  processing  feature  imaginable. 
Write  'n  Spell  also  includes  a  90,000- 
word  interactive  dictionary,  context- 
sensitive  help  screens,  mail  merge 
capability,   and  a  preview  function 


which  allows  you  to  see  how  your  text 
looks  before  you  print  it  out. 

Write  'n  Spell  is  easy  to  use — so 
easy  that  with  the  help  of  only  the  brief 
instructions  provided  in  the  Quick  Start 
folder,  you'll  be  using  the  program  ef- 
fectively within  minutes.  The  program 
disk  contains  several  example  files  that 
lead  you  painlessly  through  many  of 
Write  'n  Spell's  important  functions. 
And  the  well-organized  manual  in- 
cludes complete  tutorial  and  reference 
sections  so  you  can  find  pertinent  infor- 
mation quickly. 

No  Need  To  Remember 

Write  'n  Spell  makes  extensive  use  of  the 
IBM  function  keys  for  commands  and 
continuously  displays  a  help  line  at  the 
top  of  the  screen,  so  you  needn't  mem- 
orize what  each  key  does. 

F2,  for  example,  is  the  DISK  com- 
mand. When  you  press  F2,  a  window 
opens  which  lists  your  current  disk  op- 
tions. To  select  an  option,  either  indi- 
cate your  choice  with  the  cursor  keys  or 
simply  type  the  first  letter  of  the 
command. 

Command  windows  are  removed 
from  the  screen  with  a  touch  of  the  ESC 
key.  In  fact.  Write  'n  Spell  is  quite  forgiv- 
ing; the  ESC  key  can  be  used  to  recover 
from  almost  any  problem. 

The  program  uses  meaningful 
mnemonics  for  print  formatting — Im 
for  left  margin,  bm  for  bottom  margin, 
etc. — and  checks  the  formatting  com- 
mands for  syntax  errors.  When  it  en- 
counters a  formatting  error,  the 
program  prints  the  problem  line  in  the 
message  window,  helping  you  isolate 
and  correct  the  problem  quickly. 

Misspellings  Begone 

The  Spelling  Checker  is  one  of  the  most 
powerful  features  of  Write  'n  Spell,  and 
it,  too,  is  activated  by  pressing  a  func- 
tion key.  It  rapidly  compares  your  text 
with  its  dictionary  and  offers  four  op- 
tions when  it  finds  a  word  it  doesn't 
recognize;  Ignore,  Add,  Retype,  or 
Suggest, 

If  you  press  I  for  Ignore,  the  pro- 
gram skips  the  word  and  continues  its 
search.  If  you  press  A,  the  word  is 
added  to  the  supplemental  dictionary, 
which  eventually  will  contain  all  of  the 
unusual  words,  names,  and  numbers 
you  use  in  your  writing.  If  you  press  R 
for  Retype,  you  can  correct  the  mis- 
spelled word. 

When  you  press  S  for  Suggest,  the 
program  provides  a  most  useful  feature 
for  those  who  find  spelling  trouble- 
some. It  searches  through  the  dictio- 
nary' to  locate  up  to  eight  words  that  it 
thinks  might  fit  your  meaning.  It  then 
opens  a  window  displaying  those  sug- 
gestions. If  one  of  them  is  the  word  you 
want,  just  press  its  number  to  replace 


your  misspelled  word. 

It's  amazing  how  often  the  pro- 
gram comes  up  with  the  correct  word, 
and  even  more  amazing  how  often  the 
correct  word  is  the  first  one  in  its  list  of 
possibilities. 

It  took  Write  'n  Spell  less  than  five 
minutes  to  check  and  correct  the  text  for 
this  article,  which  contained  numerous 
misspellings  (both  intentional  and  un- 
intentional). 

Other  Features 

Write  'n  Spell  has  a  wide  range  of  addi- 
tional features.  It  can  print  one  docu- 
ment while  you  work  on  another,  it 
allows  you  to  link  files,  and  its  sophisti- 
cated text-manipulation  functions  in- 
clude block  moves  and  copies.  A  setup 
program  allows  you  to  easily  configure 
Write  'n  Spell  to  work  with  more  than  50 
different  kinds  of  printers. 

The  mail  merge  feature  lets  you 
insert  names  and  addresses  into  a  stack 
of  form  letters,  and  the  program  can 
also  accept  predefined  information 
from  spreadsheets  such  as  Lotus  1-2-3. 
If  you  have  a  printer  that  supports 
IBM's  extended  graphics  character  set, 
you  can  print  boxed  text,  complex 
mathematical  formulas,  and  bar  graphs. 

The  program  disk  includes  a  con- 
version program  which  helps  you 
transfer  files  created  by  other  word  pro- 
cessors into  a  format  compatible  with 
Write  '«  Spell.  This  program  is  not  docu- 
mented in  the  manual,  but  instructions 
are  provided  on  a  loose  sheet  packed  in 
the  box. 

Write  'n  Spell  does  not  store  text 
files  in  standard  ASCII  format,  so  you 
must  convert  them  to  ASCII  if  you  plan 
to  upload  the  files  via  modem,  Printing 
a  file  to  disk  converts  it  to  ASCII,  but 
this  requires  you  to  use  the  setup  menu 
to  define  the  disk  drive  as  your  printer. 
Unless  Write  'n  Spell  is  set  up  this  way, 
you'll  have  to  save  your  document,  exit 
the  word  processor,  run  the  setup  pro- 
gram, change  the  printer  configuration, 
rerun  Write  'n  Spell,  and  then  print  the 
document  to  disk.  The  procedure  is  a 
little  cumbersome,  but  it  gets  the  job 
done. 

Write  'n  Spell  does  allow  normal 
DOS  functions — such  as  renaming 
files,  erasing  files,  and  copying  the  cur- 
rent document — without  exiting  to  the 
system. 

Overall,  Write  'n  Spell  can  handle 
nearly  anything  you'd  ask  of  a  word 
processor.  Some  of  its  complex  opera- 
tions may  be  a  little  cumbersome,  but 
it's  a  small  price  to  pay  for  such  a 
powerful  program. 

Write  'n  Spell 
Professional  Software 
51  Fremont  Street 
Needham,  MA  02194 
S3  49.95 
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M    152K  Lowest  Price  In  The  USA!  i52k 

ATARr  Computer  System  Sale 

•   Students  •   Word  Processing   •   Home   *   Business 


$399 


LOOK  AT  ALL  YOU  GET  FOR  ONLY 

LIMITBO  OUANTITIES  SYSTEAA  PRICE 

©Atari  130XE  152K  Computer 

©Atari  1050  127K  Disk  Drive 

©Atari  1027  Letter  Quality  20  CPS  Printer 

Atari  Writer  Word  Processor 

Atari  BASIC  Tutorial  Manual 

All  connecting  cables  S  T.V.  interface  included.      ■— jn^—  a  ■  c> 
vi- Monitors  sold  separetly.  T^^TALS 


LIST  PRICE 

$249.00 

299.00 

299.00 

59.95 

16.95 

$923.90 


INDIVIDUAL 

SALE  PRICE 

$134" 

179" 

179" 

49" 

12" 


$547.75 

CALL  FOR  1027  PRINTER  REPLACEA/IENT  OPTIONS 


SAVE 

OVER  $100 

All  5  ONLY 

39900 

SYSTEM 
SALE  PRICE 


$ 


^tKer  Accessories  List  Sole 

■tr     12"  Hi  Resolution  Amber  Screen  Monitor        $199,00  $59.95 

vV     13"  Hi  Resolution  Color  Monitor  $399.00        $159.95 


AddS9.95  tor 
Connection  Cables 

Add  SlOfor  UPS 


15  DAT  FREE  TRIAL.  We  give  you  15  doys  to  try  out  this  ATARI  COMPUTER  SYSTEM! !  If  it  doesn't  meet  your  expectations,  just  send  it  bock  to  us  prepaid 
and  we  will  refund  your  purcfiose  price! !  90  DAY  IMMEDIATE  REPLACEMENT  WARRANTY.  If  any  of  the  ATARI  COMPUTER  SYSTEM  equipment  or 
programs  fail  due  to  faulty  workmanship  or  moteriol  within  90  days  of  purchase  we  will  replace  it  IMMEDIATELY  with  no  service  charge! ! 


Best  Prices  •  Over  1000  Programs  and  500  Accessories  Available  •  Best  Service 
*  One  Day  Express  Mail  •  Programming  Knowledge  *  Technical  Support 


Add  $2S.0O  for  shipping  and  handlingil 

Enclose  Coshiers  Check.  Money  Order  or  Personal  Check.  Allow  14 
days  for  delivery,  2  to  7  days  for  phone  orders.  1  doy  express  moil ! 
We  accept  Visa  and  MasterCard.  We  ship  C.O.D.  to  continental 
U.S.  oddresses  only.  Add  SI  0  more  if  C.O.D.,  odd  S25  If  Air  Mai(. 


COMPUTER  DIRECT 

We  Love  Our  Customers 
22292  N.  Pepper  Rd.,  Barrington,  It!.  60010 

312/382-5050  to  order 


Color  Monitor  Sale 


*  Composite       •  RGB       •  Sound 

Home  Computers        VCRs        Modular  TV  Tuners        Video  Games 


Excellent  Color  Reproduction 

&  Special  "Green  Screen 

Only"  Option 

True  color  reproduction  is 
achieved  by  a  Zenith 
designed  state-of-the-art 
integrated  circuit  chip  that 
processes  the  composite 
video  signal.  A  custom 
Zenith  analog  RGB  direct 
drive  gain  contro!  integrated 
circuit  allows  user- 
preference  for  the 
adjustment  of  picture  drive 
and  black  level.  Zenith's 
unique  "Green  Screen  Only" 
feature  eliminotes  all  other 
colors  so  that 
monochromatic  text 
material  may  be  easily 
displayed  in  green  on  the 
black  face  screen. 

Constant  Intensity  Character 
Definition  Quality 

Quality  circuitry  design  generates 
crisp  lines,  pure  colors,  and  sharp 
character  definition  for  easy-fo- 
read  displays.  DC-coupling 
permits  the  video  display  to 
retain  its  color  balance  from 
a  single  dot  to  a  full  screen 
of  data.  Even  when  room 
lighting  changes,  a  "special 
light  sensor"  automatically 
adjusts  the  display 
brightness. 

List  $499.00 

Sale  $139.95 


SO*® 


!139 


95 


LIMITED 
QUANTITIES 


ZVM  131 -Accessible  by 
Many  Popular  Systems 

The  ZVM  131  is  designed 
to  interface  with  most 
personal  computers, 
VCRs,  video  discs,  video 
games  and  modular  TV 
tuners  that  have  either 
composite  video  or  RGB 
direct  drive  outputs. 


Compatibility  Chart 

Computer  Intefiaces  Via 


Apple  II 

Composile 

Aplus  3000 

RGB 

Apple  III 

RGB 

IBM  PC 

RGB 

Commodore 

128 

RGB  Composite 

Commodore 

64 

Composite 

Commodore 

Vic-20 

Composite 

Tl  99/4 

Composite 

Atari  800 

Composite 

Atari  1200 

Composite 

Atari  1400 

Composite 

Connection  Cables 


RGB  Cable  —  $19. 

C12S.  Aplus  3000  (Specify) 


95       Composite  —  $9.95 

Commodore.  Aptus  3000,  Atari  (Specify) 


The  ZVM  T31 
Sound  Of  Quality 

The  output  sound  level  is 
externally  regulated  by  a 
user-odjustment  volume 
control.  Use  the  Zenith 
quality  sound  system  to 
monitor  the  modern  audio 
capabilities  of  the  computer 
generation. 

Easy-To-Reach  Front  Access 
Controls 

ZVM  nrs  13"  diagonal 
display  screen  can  exhibit 
impressive  graphics  and 
intensely  clear  copy.  Easy- 
to-reach  front  access  user 
controls  (picture,  black 
level,  color  level,  tint, 
shorpness,  audio  volume, 
background  noise  control) 
make  display  adjustment 
simple  ond  fast.  An  LED 
power  on  indicator  notifies 
the  user  when  the  monitor  is 
operable. 

Multiple  Monitors  On 
A  Single  Computer 

The  composite  video  "loop-thru" 
feature  permits  a  single 
composite  video  source  to  drive 
several  monitors  ot  the  same 
time.  This  allows  easy  display 
possibilities  for  multiple 
viewers  in  business  ond 
educational  applicotions.  No 
more  crowding  around  a  single 
terminal.  Everyone  enjoys  a 
clear,  unobstructed  view  of 
important  data. 


This  Is  The  Best  Value  Of  The  Century 


Add  517,50  for  shipping,  fiondling  and  insurancB.  Illinois  fasidents 
please  add  6%  \ax.  Add  JSS.OOtor  CANADA.  PUERTO  RICO.  HAWAII. 
ALASKA  APO-FPO  orders.  Conadian  orders  must  he  in  U.S.  dollors. 
WE  DO  NOT  EXPORT  TO  OTHER  COUNTRIES  EXCEPT  CANADA. 
Enclose  Cashiers  Check.  Money  Order  or  Personal  Check.  Allow  M 
doys  for  delivery.  2  lo  7  doys  for  phone  orders,  1  doy  express  mail  I 
VISA  —  MASTER  CARD  —  C-O.D. 

No  C.O.D.  to  Conodo.  APO-FPC 


We  Love  Our  Customers 

22292  N.  Pepper  Rd..  Borrington,  Illinois  6(K)10 

312/382-5244  to  order 


COMMODORE  64     $  1  ^O's 
COMMODORE  128  $10000 


PLUS  FREE  ttt.tS 
Word  Procvuor 


SYSTEM  SALE 


UMITID  QUANTITIES 

Deal  1 

Commodore  B4 

Com.  1541  Disk  Drive 

Com.  803  Printer 


Dea,l  Z 

Commodore  B4 

1541  Disit  Drive 

13"  Zenith  Color  Monitor 


407  ^457 


PLUS  FREE  S49.S5  Oil 
Barrons  Adventure 


PLUS  FREE  W.ii  Oii 
Barrens  Advenlure 


.Sis! 


Commodore 

CI  28  Computer 

$289.00  * 

CI  28  1571 

Disk  Drive 

$259.00  * 


Pasted; 


^^^^^^^^^^^m 


r^-S^^i 


SUPER  OFFER 


CI  28  COIMPUTER 


SUPBR  OFFER 


FREE  WORD  PROCESSOR  COUPON 

(Expires  4-1 -86)  CM« 

To  Introduce  you  to  the  C128  computer  we  are  offering  you  the  finest  word  processor  mode,  Word 
Writer  II  with  Spell  Checker  by  Timeworks.  When  you  apply  the  $69.95  value  word  processor  to 
yoor  purchase  price  of  the  C128  at  $289.00  your  net  cost  Is  only  $219.05.  (,  coupon  per  family) 

C11*  Word  Writer  with  SS.OW  word  Sp«il  CK«kar  —  An  80  column  professional  word  processing  system  thol  includes  □ 
speilmg  checker  ond  a  builf  in  calculator.  Easy  to  use  because  of  the  full  screen  format,  you  con  view  the  document  on  your  screen 
as  It  will  oppeor  when  printed.  Pull-down  menus  meon  that  the  user  doesn't  hove  to  memorize  commands.  You  press  a  key  to 
activate  a  Word  Writer  feature  and  the  program  guides  you  through  its  proper  use  with  logicol  and  easy-to-follow  prompts.  The 
program  has  been  designed  to  interface  with  Timowork's  Dafo  Manager  2,  o  database  program  and  Swiftcaic,  a  spreadsheet. 
Contains  oil  the  ieolures  youll  need  for  everyday  word  processing,  plus  more  sophisticated  features  such  as  document  chaining, 
form  letter  printout,  poge  seporotions,  horizontal  and  vertical  scrolling  ond  much  more,  (Disk)  List  S69.95. 


JiiJsUiS- 


;S*{5^ 


Commodore  C128  Computer  *289.00.  This  all-new  revolutionary  128K  computer  uses  Commodore  64  computer  software 
CPM  Software,  pigs  new  advanced  C-1 28  software.  You  poy  only  $289  for  the  CI  28  computer!  Leu  the  value  of  the  Special 
Softwdre  Drtcount  Coupon  (see  page  14  of  our  64  page  catalog)  we  pack  with  your  computer  that  allows  you  to  Save 
Over  »250  off  software  sale  prices!  !  With  only  SI 00  of  savings  applied  your  net  computer  cost  is  $189.00    PLUS  FKEE 
1 69.95  Word  ProcatMor.  ** 

rtl!^  '"j  Commodore  Dlik  Drfwe  W59.00.  Double  Sided,  Single  Disk  Drive  for  C-128  allows  you  to  use  C-1 28  mode  plus 
CPM  mode.  17  times  faster  than  the  1541,  plus  runs  Commodore  64  software.  You  poy  only  S259  00  for  the  340K  1571 
Commodore  Disk  Drive.  Lex  the  value  of  the  Special  Software  Discount  Coupon  (see  poge  14  of  our  64  page  catalog) 
we  pock  with  your  Disk  Drive  that  allows  you  to  Save  Over  »JSO  off  software  sole  prices!  With  only  $100  of  sovinos 
applied  your  net  Disk  Drive  cost  is  only  $159.00, 


Add  SI  0.00  for  shipping,  hondling  and  insurance.  Illinois  roiidents 
please  odd  6%  tax.  Add  $20.00  lor  CANADA,  PUERTO  RICO,  HAWAII, 
ALASKA,  APO-FPO  orders.  Conodlan  orders  must  bs  in  U  S  dollars 
WE  DO  NOT  EXPORT  TO  OTHER  COUNTRIES.  EXCEPT  CANADA. 
Enclose  Cashiers  Check,  Money  Order  or  Personal  Check.  Allow  U 
days  tor  delivery,  2  to  7  doys  for  phone  orders.  1  day  express  mall! 

VISA  —  MASTER  CARD  —  C.O.D. 
NoC.O.D.  to  Conodp.  APO.FPO. 


We  Love  Our  Customers 

22292  N.  Pepper  Rd.,  Barrington,  Illinois  600)0 

312/382-5244  to  order 


EXTRA  WIDE  15"  + 
\??  PRINTER  SALE  l^P 

*  One  Year  Immediate  Replacement  Warranty  •  IS  Day  Free  Trial 


$ 


Comstar  ISVsX 


120-140  CPS 


oo 


List  $499.00 


(IBM  —  Commodora ) 
Print  Six* 

10,  12,  17,  5,6,  8.5  CPI 
Numbsr  of  Column* 

136,  164.232(68,82,  1 16  Double  Width) 


•  Tractor/Frlctton  Print»r  •  Dot  Matrix,  Impact, 
Prlnti  SIngI*  Sheati  or  Contlnuoui  F««<i  Papar,  ISYi " 
CorrioBS  •  Print  Buffar  •  f  x  f  Dot  Matrix,  Doubla 
Strlka  •  Naar  Lettor  Quality,  High  Racolutlon  Dot 
Bit  Imaga  •  Undarllning,  Laft-Right  Margin  •  Tru« 
Low  Dascsndari,  Supar  and  Subscript  *  Prinit 
Standard,  Block  Graphic*  A  Italic*  •  Cantronic* 
Poralial  Intarfaca 

COIVISTAR    ISVsX    SPECIFICATIONS  (Appla  -  Atari  -  Etc. ) 

Character  Font*  Character  Sati 

Normal  (10  CPI);  Elite  (12  CPI):  Condensed  96  Slondord  ASCII,  32  Block  Grophie,  96 

(17  CPi);  Enlarged  (5,  6,  8.5  CPI);  Emphasiz- 


ed: Double  Strike:  Super  &  Sub  Script 


Italics  Chorocters 
Cartridge  Ribbon.  List  S6.95.  Sal«l4.«S. 


15"  Printers  use  10"  and  15"  Paper 


CANON  15"  Printer 


$ 


259 


00 


List 
$699.00 


(IBM  —  Commodore ) 

Printing  Method 

Impact  dot  motrix 

Printing  Spaad 

160  CPS  at  stondord  character  printing 

27  CPS  at  NLQ  character  printing 

Printing  Characters 

Standard  11x9  dot  matrix 
NLQ  23  X  18  dot  matrix 

Character  set;  Full  ASCII  character  set  (96), 
32  special  European  characters 


160  CPS  +  Letter  QuaUty  Mode 

•  Programmable  Characters 
•  2K  Buffer  •  15  Day  Free  Trial 

CANON  SPECIFICATIONS      (Appi.  -  Atari  -  Etc. ) 


Print  Buffer 

2K-byte  utility  buffer 
Image  Printing 

Horizontal  120  dots/inch  (double  density) 

Horizontal  240  dots/inch  (quadruple  density) 

Interface 

e-bit  porollel  interfoce  (Centronics  typo) 

Paper 

Plain  paper,  Roll  paper.  Single  sheet, 

Fanfold,  Multipart  paper:  max.  3  sheets 


interfaces 


IBM  $89.00 


Apple  $59.00 


Atari  $59.00 


Ink  Ribbon  Cartridge  —  Sale  *14.tS 

Ribbon  Life;  3  million  choracters/cortridge 
Maximum  Number  of  Character* 

Standard:  10     cpi  BO  cpl 

Enlorged:  5     cpi  40  cpl 

Condensed:  17.1  cpi  136  cpl 

Condensed  enlarged:  8.5  cpi  68  cpl 

Elite:  12     cpi  96  cpl 

Elite  enlarged:  6     cpi  48  cpl 

NLQ  pica:  10     cpi  80  cpl 

NLQ  pica  enlarged:  5     cpi  40  cpl 


Commodore  $39.00 


Add  S17  50  for  shipping,  handling  ond  insurance.  Illinois  residents 
please  add  6%  tax,  Add  t35.00  for  CANADA.  PUERTO  RICO.  HAWAII, 
ALASKA  APO-FPO  orders.  Canadian  orders  must  be  in  U.S.  dollars. 
WE  DO  NOT  EXPORT  TO  OTHER  COUNTRIES,  EXCEPT  CANADA. 
Enclose  Cashiers  Check.  Money  Order  or  Personal  Check.  Allow  14 
doys  for  delivery.  2  to 7  days  for  phone  orders.  1  doy  express  moil! 
VISA  —  MASTER  CARD  —  C.O-D. 

No  C.O.D.  to  Canodo.  APO-FPO 


We  Love  Our  Customers 

22292  N.  Pepper  Rd..  Barrington,  Illinois  60010 

312/382-5244  to  order 


Famous  Smith  Corona  National  Brand 

1 0"  PRINTER  SALE 

BGlov\f  y\fhGlesale  Cost  Prices!!! 

•  ONE  YEAR  IMMEDIATE  REPLACEMENT  WARRANTY 

*  Speed:  120  or  160  characters  per  second      *  Friction  Feed/Tractor  Feed  —  Standard 

*  80  character  print  line  at  10  CPI     •  1  Line  Buffer,  2K  Buffer  on  120/160  CPS  Plus  LQM 

*  Six  pitches        *  Graphics  capability        *  Centronics  compatible  parallel  interface 

*  Features  Bidirectional  Print,  Shortllne  Seek,  Vertical  And  Horizontal  Tabs 

Check  these  features  &  prices 

±20  CPS  lO''  Printer 


List 
$429.00 


159 


120  CPS  +  Letter  Quality 
Mode  10'*  Printer 

List  ^^ 

-449.00         ^p 

SALE 


179 


SUPER  GRAPHICS 


emphasized 


This  is  a  sample  of  our 
near-let ter-qual ity  print, 

There  is  standard  data 
processing  quality  print 


160  CPS  +  Letter  Quality 
Mode  10"  Printer 


List 
$499.00 


italic   print 


(IBM  —  Commodore ) 
SIi»/W»lsht 

Height  5.04"  Width  16.7" 

Depth  13.4"  Weight  18.7  lbs. 

Intsrnal  Char.  Coding 

ASCII  Plus  ISO 

Print  Buffar  Slzs 

120  CPS:  132  Bytes  {1  line) 

120/160CPS  Plus  LQM:  2K 

No.  of  Char.  In  Char.  Sat 

96  ASCII  Plus  International 

Graphic!  Capability 

Standord60.  72,  120  DPI 

Horizontal  72  DPI  Vertical 

Pitch 

10,  12,  16.7,  5,  6,  8.3,  Proportionot  Spacing 

Printing  M«thod 

Impact  Dot  Motrix 


SALE 
SPECIFICATIONS 


f199 


(Apple  —  AtQrr  —  Etc. ) 


Char.  Matrix  Stis 

9H  X  9V  (Stondord)  to  I  OH  x  9V 

(Ennphosiied  &  Elongotel 

Printing  F«atur*> 

Bi-directional,  Short  line  seeking,  Vertical 

Tabs,  Horizontal  Tabs 

Formi  Typ* 

Fanfold,  Cut  Sheet,  Roll  (optional) 

Max  Popar  Width 


ir 

F»«ding  M«thod 

Friction  Feed  Std.;  Tractor  Feed  Std. 

Ribbon 

Cassette  —  Fabric  inked  ribbon 

Ribbon  Lifa 

4  million  choracters 


Interfaces 


intarfotat 

Parallel  8  bit  Centronics  compatible 

120/160  CPS  Plus  NLQ:  RS232  Serial  inc. 

Character  Mod* 

10x8  Emphasized;  9x8  Standord:  10x8 

Elongated;  9x8  Super/Sub  Script  (1  pass) 

Charactsr  Sal 

96  ASCII 

11x7  International  Char. 

Line  Spacing 

6/8/12/72/144  LPI 

Charoctar  Spacing 

10  cpl  normol;  5  cpi  elongated  normal;  12cpi 

compressed;  6  cpi  elongated  compressed: 

16.7  cpi  condensed;  6.3  cpi  elongated 

condensed;  5. 12.5  cpi  elongated  proportional 

Cartridge  Ribbon  —  List  $19,95.  Solo  $13.91. 


IBM*  89 .00 


Apple  «59.00 


Atari  $59.00 


Commodore  $39.00 


Add  JU.50  for  shipping,   handling  and  insuranc*.   illinoit  raiidenli 
please  odd  6%  lox.  Add  $29.00  for  CANADA,  PUERTO  RICO,  HAWAII, 
ALASKA.  APOFPO  orders.  Canadian  orders  most  ba  in  U.S.  dollars. 
WE  DO  NOT  EXPORT  TO  OTHER  COUNTRIES,  EXCEPT  CANADA. 
Enclose  Cashiers  Chocli,  Money  Order  or  Personal  Chetls,  Allow  U 
days  delivery.  2  to  7  doys  for  phone  orders.  1  doy  express  moil ! 
VISA  —  MASTERCARD  —  C.O.D.  No  C.O.O.  to  Conado  or  APO-FPO 


We  Love  Our  Customers 

22292  N.  Pepper  Rd.,  Barrington,  Illinois  60010 

312/382-5244  to  order 


Microsoft  BASIC  2. 1  For  Macintosh 


Charles  Brannon,  Program  Editor 

Requirements:  Microsoft  BASIC  requires 
128K  memory,  but  512K  is  recommended 
for  best  performance,  (Amiga  watchers 
take  note — Microsoft  AmigaBASlC  is  very 
similar  in  features  to  Macintosh  Microsoft 
BASIC.) 


When  Apple  unveiled  its  Macintosh  in 
January  1984,  it  was  received  enthusi- 
astically. Here  was  a  machine  with 
128K  RAM,  a  400K  disk  drive,  and  a 
16/32-bit  68000  microprocessor  run- 
ning at  eight  megahertz,  one  of  the 
fastest,  most  powerful  microprocessors 
in  production.  But  what  really  attracted 
attention  was  the  Macintosh's  power- 
ful, yet  simple  to  learn,  operating 
system. 

Some  critics,  though,  have  ques- 
tioned the  utility  of  this  flashy  machine. 
Sure,  it's  easy  to  drag  folders  around  to 
move  or  copy  files.  Certainly  it's  easier 
to  point  to  a  menu  item  than  to  type  a 
cryptic  stream  of  commands  on  a  key- 
board. But  the  glaring  lack  of  a  pro- 
gramming language  seemed  to  stratify 
the  market  into  two  classes:  users  and 
programmers.  Apple  described  the 
Macintosh  as  "the  computer  for  the  rest 
of  us."  Should  that  exclude  those  inter- 
ested in  writing  their  own  programs? 

With  the  first  release  of  Microsoft 
BASIC,  then  enhanced  BASIC  2.0,  and 
now  the  even  speedier  and  debugged 
version  2.1,  this  last  obstacle  has  fallen. 
Anyone  can  now  write  their  own  Mac- 
intosh applications,  whether  for  fun  or 
profit.  And  this  is  no  ordinary  BASIC:  It 
is  one  of  the  most  sophisticated  and 
full-featured  BASICs  available  for  any 
personal  computer.  If  you're  used  to 
Microsoft  BASIC  on  Apple,  Commo- 
dore, or  IBM  machines,  you'll  instantly 
see  some  similarities,  but  just  as  quickly 
notice  the  differences. 

Who  Needs  Numbers? 

The  core  of  Microsoft  BASIC  for  the 
Macintosh  is  almost  identical  to  IBM 
Advanced  BASIC,  but  a  major  differ- 
ence is  that  line  numbers  are  now  op- 
tional. Line  numbers  evolved  from  the 
simple  line-oriented  editors  used  on 
mainframe  computers  in  the  1960s,  and 
they  have  survived  right  into  the  1980s. 
With  full-screen  editing — including 
word  processor-like  up  and  down 
scrolling — line  numbers  become  super- 
fluous, except  as  targets  for  GOTO  and 
G05UB  statements.  Macintosh  BASIC 
even  makes  line  numbers  optional  in 
these  cases  by  allowing  you  to  refer- 
ence GOTOs  and  GOSUBs  with  labels. 


so  you  can  write  lines  like  this: 

IF  Balance<  =  0  THEN  GOTO  Check- 
Bounce 

CheckBounce:  PRINT  "That'll  be  a  $10 
service  charge." 

Since  line  numbers  arc  optional, 
Macintosh  Microsoft  BASIC  gives  you 
the  freedom  to  scroll  anywhere  in  a 
listing  and  edit  any  line.  The  mouse  is 
used  to  scroll  up  and  down,  and  to  set 
the  insertion  point  (cursor  position). 
You  edit  your  program  in  a  window 
called  List.  You  can  have  two  List  win- 
dows open  at  once,  showing  different 
parts  of  your  program.  Familiar  Macin- 
tosh features  such  as  Cut  and  Paste  are 
supported. 

When  you  run  your  program,  all 
input  and  output  takes  place  in  the 
Output  window.  A  fourth  window, 
called  Command,  lets  you  try  out  di- 
rect-statement lines  and  execute  some 
commands.  All  these  windows  can  be 
moved  and  resized.  It's  easy  to  have  all 
four  on  the  screen  at  once.  When  you 
double-click  (press  the  mouse  button 
twice  in  rapid  succession)  on  a  title  bar, 
the  corresponding  window  instantly 
fills  the  screen.  Another  double-click 
returns  the  window  to  its  original  size. 

Microsoft  BASIC  fits  in  well  with 
the  Macintosh  philosophy.  It  can  read 
and  write  to  the  Clipboard,  making  it 
easy  to  transfer  data  between  applica- 
tions. For  example,  you  can  draw  a 
picture  with  MacPaint,  then  grab  and 
animate  the  picture  in  BASIC.  Pull- 
down menus  let  you  save,  load,  run, 
stop,  and  trace  programs.  The  trace  fea- 
ture is  especially  powerful.  While  your 
program  is  running  in  the  Output  win- 
dow, you  can  watch  the  program  exe- 
cute line  by  line  in  the  List  window.  In 
the  single-step  mode,  you  can  trace  the 
program  in  one  window,  watch  the  out- 
put in  the  Output  window,  and  enter 
commands  in  the  Command  window — 
all  simultaneously. 

Add  Your  Own  Commands 

Variable  names  can  be  up  to  40  charac- 
ters long,  and  all  characters  are  signifi- 
cant (CHANGE  and  CHANGENAME 
would  be  different  variables).  Ad- 
vanced structures  include  IF-THEN- 
ELSE  and  WHILE-WEND.  Device- 
independent  input/output  lets  you  use 
the  same  I/O  commands  with  all  de- 
vices (screen,  keyboard,  printer,  clip- 
board, etc.).  Sequential  and  random- 
access  disk  files  are  supported.  Another 
feature  not  to  be  ignored  is  subpro- 
grams. A  subprogram  is  a  miniature 
program    with   its   own    independent 


variables.  In  effect,  you  can  create  your 
own  BASIC  commands  in  BASIC.  Sub- 
programs are  much  more  flexible  than 
mere  subroutines. 

Also,  note  that  there  are  two  ver- 
sions of  BASIC  2.1  included  in  the 
package.  One  does  its  math  in  BCD 
(Binary  Coded  Decimal),  which  never 
makes  rounding  errors — a  vital  feature 
for  business  programming.  The  other 
BASIC  uses  standard  binary  floating 
point,  and  runs  faster. 

The  Macintosh  is  known  for  its 
superb  high-resolution  graphics.  Mi- 
crosoft BASIC  is  no  slouch  here.  It  has 
commands  for  drawing  points,  lines, 
boxes,  filled  boxes,  circles,  ovals,  and 
arcs.  PUT  and  GET  let  you  grab  and 
animate  rectangular  sections  of  the 
screen.  Pictures  can  also  be  stored  in 
strings  as  a  sequence  of  commands.  Just 
use  PICTURE  ON,  and  all  graphics 
calls  will  be  stored  until  PICTURE  OFF 
is  executed.  You  can  then  display  the 
picture  anywhere  on  the  screen,  in  any 
dimension,  and  enlarge  or  contract  the 
picture.  Microsoft  BASIC  also  lets  you 
use  many  of  the  powerful  QuickDraw 
routines  in  the  Macintosh  ROM  Toolbox. 

With  Microsoft  BASIC,  you  can 
write  programs  that  look  and  act  like 
commercial  software,  taking  advantage 
of  pull-down  menus,  windows,  and  di- 
alog boxes.  The  WINDOW  command 
creates  a  variety  of  window  styles  and 
shapes.  BUTTON  creates  a  square  box 
that  is  sensitive  to  mouse  selection. 
MENU  and  DIALOG  let  you  read  the 
status  of  menus,  windows,  and  dialog 
boxes.  You  can  even  trap  certain  events. 
Your  program  could  be  busy  drawing  a 
figure,  then  interrupted  when  the  user 
selects  a  menu.  This  transfers  control  to 
your  menu  subroutine.  When  the  menu 
action  is  fulfilled,  the  program  contin- 
ues drawing  the  figure. 

Speed  And  Memory 

Like  many  applications,  Microsoft 
BASIC  drives  the  Macintosh  to  the  lim- 
its of  its  hardware.  Keeping  in  mind  the 
great  power  of  this  BASIC,  there  are 
still  some  inadequacies.  There  just  isn't 
enough  memory  to  hold  the  operating 
system,  your  BASIC  program,  and  the 
Microsoft  BASIC  interpreter  all  at  once. 
To  get  around  this,  BASIC  loads  itself  in 
pieces,  swapping  sections  in  and  out  as 
needed.  This  can  slow  you  down  to  a 
crawl,  though,  especially  when  you're 
switching  between  windows.  It's  possi- 
ble to  increase  the  size  of  the  heap 
space  (where  the  swapped  portions  of 
BASIC  reside)  at  the  cost  of  program 
space,  and  this  seems  to  help  some. 

Still,  Microsoft  BASIC  for  the  Mac- 
intosh runs  faster  than  comparable  Mi- 
crosoft BASICS  on  other  micro- 
computers.  As   with  many  other 
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The  1050  DUPLICATOR  IS  HERE... 


THE  1050  &  810  DUPLICATOR:  The  most  powerful 
diskdrive  copy  system  ever  developed  for  ttie  ATARI. 


The  only  Copy  System  You  will 
ever  need! 

What  will  it  do? 

fc-  77)8  main  purposo  oflho  Duplicator  Is  to  copy  ditktl  Vou  v/sU  be 
able  to  copYjust  about  any  diski  Thecopies  you  make  Mill  run  on 
any  Atari  drive  The  Duplicator  neeO  not  be  present  To  run  your 
tDockup  copies  Ttie  Duplicator  is  tuHy  automatic.  You  need 
only  insert  source  and  aestination  aisks.  Custom  formats  will 
be  reocJ  and  in  turn  reproduced  on  ttie  bacitup  copy  disk. 
Our  device  will  reproduce  any  c  ustom  format  or  heavily 
copy  guarded  scheme,  bad  sectors,  double  sectors, 
1 9  through  2A  sector  format  will  present  no  problem 
to  the  Duplicator. 

^You  will  still  have  single  density,  and  double 
density.  When  you  have  a  Duplicator  mstoiledm  o 
1050  drive  that  drive  will  Ce  fumed  info  true  double 
density  You  will  have  twice  the  disk  storage  Your  drive 
will  be  compatible  with  other  double  density  drives  as  /he 
Ikina  Indus.  Percom,  etc 

HARDWARE  POWER 

Fully  Compatible  with  the  XL  &  New  XE  Series, 


High  speed  read  &  write,  your  disk  drive  will  readond  load  dll 

of  your  softvi/are.  sieving  wearand  tearon  your  drive  The  810 

and  1050  drives  now  read  one  sector  at  a  time.  This  is  slow 

and  inefficient.  With  the  duplicator  installed  you  will  be 

able  to  read  eighteen  seders  in  the  time  it  takes 

standard,  ungnhanced  drives  to  read  one 

Included  with  every  Duplicator  will  be  user 

friendly  disk  software.  A  simple,  menu  driven 

program  will  allow  you  to  copy  all  of  your 

soltware  A  Duplicator  enhanced  drive  will 

Oe  O  SMART  drive  We  plan  to  wri'e  many 

new  and  exciting  programs  that  can  only  Ije 

run  on  an  enhanced  drive,  eg   sending  a 

copy-guarded  disk  over  the  ohone.  Since  the 

drive  is  now  fuiiy  programmobie.  future  upgrades 

can  be  made  available  to  you  on  disks,  should  the 

need  arise  No  further  hardware  changes  will  ever  be 

needed  The  Duplicator  comes  with  a  full  hardware  and 

software  guarantee 


$14915 


<t/  me  8 10  or  1050  wn&n  OfOefffi^j 
Pfu$  $2  50  for  s^upping  hondltrig 
iV  V  Sfate  ffwasnti  oOd  7'.':%  S&ei  Tax 
Deoier  mqu-res  are  welcome,  ca*'  for  Quonury  pnce  quote 


EASY  5  MINUTE  INSTALLATION 

NO  HARM  TO  VOUR  DRIVE  OR  INCOMPATIBILnV  PROBLEMS  CAN  EVER  ARISE  AS  A  RESULT  OF  THE  INSTALLATION  OF  OUR  DUPLICATOR, 

IMPORTANT:  Only  a  hardware  device  like  the  DUPLICATOR  can  backup  heavily  copy-guarded 
diiki^  Doni  be  fooled  by  software  programs  that  claim  to  do  this. 

"While  others  make  claims. . .  we  mal<e  Copies"  i 

^  DUPLICATING  TECHNOLOGIES  inc  

99  Jericho  Tpke.,  Suite  302A  Jericho  N.Y.  1 1 753    g!S«»  i*..  (51 6)  333-5808.  5805.  5807  ?nS'J^kend.  (516)  333-5950 

nnus:  Wb  aecapl  American  Cuprait.  Vita.  MuifsrCord  and  C.O.D.  orfferj.  Foralgn  order*  mutt  be  In  U.t  Oollm  All  pertonof  cft«yn  allow  U  dayi  to  clear.  W»  itilp  nitlhln  24  hours. 


Macintosh  programs,  Microsoft  BASIC 
needs  a  second  disk  drive  and  more 
memory  to  live  up  to  its  full  potential, 
but  works  well  with  a  128K,  one-drive 
system.  If  you  have  a  Fat  Mac  (the  only 
type  now  being  manufactured),  Micro- 
soft BASIC  runs  at  full  speed  with  no 


delays  and  minimal  disk  access. 

Now  that  a  powerful  and  easy  to 
use  BASIC  is  available,  we're  beginning 
to  see  hundreds  of  new  programs  for 
the  Macintosh  as  eager  programmers 
churn  out  code  for  this  two-year-old 
computer.  All  we  need  now  is  an  equal- 


ly powerful  BASIC  compiler. 

Microsoft  BASIC  2.1 
Microsoft  Corporation 
10700  NorShup  Way 
Box  S7200 
Belleviie,  WA  98009 
$150 


Bank  Street  Mailer  Bank  Street  Filer 


James  V.  Trunzo 

Requirements:  128K  80-column  version 
available  for  Apple  Ik  or  128K  He  (with 
extended  80-column  card);  64K  40-column 
versions  available  for  Apple  11+  and 
Commodore  64;  one  disk  drive,  printer. 

Broderbund  Software  continues  to  en- 
hance its  reputation  and  its  home  pro- 
ductivity line  with  the  release  of  Bank 
Street  Filer  and  Batik  Street  Mailer.  Both 
products  reflect  Brederbund's  effort  to 
provide  products  with  power,  flexibili- 
ty, and  ease-of-use.  Filer  and  Mailer 
offer  a  wide  variety  of  options  and  can 
be  integrated  with  one  another  and 
with  Bank  Street  Writer,  Broderbund's 
word  processor. 

Both  programs  are  available  in  40- 
or  80-column  versions  (Apple  only); 


come  with  simple  but  thorough  tutorial 
programs;  have  on-screen  menus;  let 
you  make  backups;  offer  a  dual-drive 
option;  and  include  a  utility  program 
that  performs  a  variety  of  functions  in- 
cluding disk  formatting,  printer  setup, 
and  report-formatting  options. 

Bank  Street  Mailer  is  so  versatile 
that  you  can  not  only  create  mailing 
lists,  but  also  write  and  edit  a  letter 
without  using  Bank  Street  Writer.  In  fact, 
the  letter-writing  option  contains  al- 
most all  the  features  you'd  expect  to 
find  in  a  word  processor.  You  can 
move,  copy,  center,  set  page  breaks, 
and  use  up  to  16  printer  format  com- 
mands. In  addition.  Mailer  provides  a 
somewhat  unique  and  useful  option 
known  as  boilerplating.  You  can  store 
commonly  used  phrases  (inside  ad- 
dresses, greetings,  etc.)  on  the  Mailer 


disk  and  insert  them  in  the  letters  that 
you  compose  simply  by  hitting  a  key. 
The  only  limitation  when  writing  with 
Mailer  is  a  1,000-word  limit  per  letter. 

Of  course,  the  main  purpose  of 
Bank  Street  Mailer  is  to  create,  edit,  and 
print  mailing  lists  and  merge  the  data 
into  prepared  letters.  Mailer  does  this 
admirably.  Creating  and  editing  a  mail- 
ing list  is  a  snap,  and  all  programs  of 
this  type  are,  on  the  surface,  very  simi- 
lar. Mailer  goes  one  step  beyond  by 
including  a  powerful  data-searching 
routine  which  altoivs  you  to  extract  as 
much  or  as  little  information  as  desired. 
Furthermore,  all  data  entered  into  Mail- 
er can  be  sorted  alphabetically  or 
numerically. 

Merging  data  with  Mailer  is  also 
easy  and  can  range  from  simply  insert- 
ing addresses  to  customizing  form  let- 
ters by  inserting  stored  messages 
(reminders,  reference  material,  etc.)  se- 
lected from  disk.  If  you're  only  writing 
a  single  letter.  Mailer  lets  you  retrieve 
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an  entire  name  and  address  simply  by 
typing  a  person's  last  name  while  com- 
posing the  letter. 

Mailer  can  print  labels  and  enve- 
lopes, too.  In  fact,  this  program  boasts 
many  additional  options  which  are  a 
delight  to  use  and  discover  for  yourself. 

Flexible  Report  Formatting 

Bank  Street  Filer  is  no  less  impressive 
than  its  sister  programs.  It  includes  all 
the  features  common  to  most  database 
managers,  so  let's  focus  on  Filer's  spe- 
cial features. 

For  one  thing,  Bank  Street  Filer 
makes  ample  use  of  screen  windows, 
overlaying  one  block  of  information 
atop  another.  This  is  especially  handy 


when  working  with  Filer's  powerful 
search  procedures.  Filer  also  provides 
an  on-screen  notepad  that  lets  you  jot 
down  comments  (which  can  be  used 
later  when  writing  a  report)  without 
interrupting  your  work  with  the  data- 
base itself. 

Speaking  of  reports.  Bank  Street 
Filer  can  generate  a  variety  of  report 
types;  It  is  already  set  up  to  generate 
four  types  of  "quick"  report  formats, 
printing  out  your  data  in  a  selected 
report  style  with  a  few  simple  key- 
strokes. However,  you  can  customize 
either  table  reports  or  page  reports  in 
almost  any  way  you  choose. 

Creating  forms  is  also  quite  flexi- 


ble: You  can  position  your  fields  any- 
where you  like.  Filer  also  recognizes 
special  fields  like  DATE  and  TIME.  You 
can  even  call  a  full-featured  calculator 
to  the  screen,  perform  your  calcula- 
tions, and  insert  them,  if  you  want,  into 
a  data  field.  These  are  only  a  few  of  the 
many  built-in  functions  that  make  Bank 
Street  Filer  an  excellent  tool  and  a  wor- 
thy addition  to  the  Bank  Street  software 
series. 


Bank  Street  Mailer 

Bank  Street  Filer 

Brederbund  Software 

17  Paul  Drive 

San  Rafael,  CA  94903-2101 

$69.95 


Psion  Chess 

For  IBM  And  Macintosh 


John  Krause,  Assistant  Technical  Editor 

Requirernents:  Apple  Macintosh;  IBM  PC 
with  color /graphics  card  and  at  least 
128K  RAM;  or  an  Enhanced  Model  IBM 
PCjr. 

So  you  think  computer  chess  programs 

are  a  pushover?  There's  a  new  kid  on 
the  block.  Joint  winner  of  the  1984 
World  Microcomputer  Chess  Champi- 
onship, Psion  Chess  provides  a  chal- 
lenge for  even  the  most  experienced 
chess  player. 

Choose  from  1 4  levels  of  difficulty. 
Novice  to  Infinite.  The  Novice  level 
responds  almost  instantly  and  senses 
the  strength  of  your  play,  playing  more 
gently  against  weak  opponents.  Still, 
it's  difficult  to  tame  such  a  powerful 
beast,  and  some  beginners  may  be  un- 
able to  win  even  on  this  level.  On  the 
Infinite  level,  the  computer  keeps 
thinking  until  you  stop  it,  at  which 
point  it  plays  the  best  move  it  has 
found.  On  the  Equal  level,  the  com- 
puter takes  the  same  amount  of  time  to 
think  as  you  do.  The  longer  you  think, 
the  better  the  computer  plays. 

On  all  levels,  after  the  computer 
makes  a  move,  it  guesses  what  your 
next  move  will  be  and  continues  to 
think  while  waiting  for  your  move.  If  it 
guesses  correctly,  it  responds  quickly 
with  its  next  move  and  plays  better 
since  it  can  think  longer.  This  feature 
can  be  turned  off  by  selecting  Handi- 
cap, effectively  doubling  the  number  of 
levels. 

The  program  has  a  thorough  knowl- 
edge of  all  the  subtleties  of  chess.  Sure, 
it  has  the  usual  library  of  opening 
moves,  but  even  if  you  take  it  out  of  its 


library  by  making  unusual  moves,  it 
understands  the  basic  ideas  well 
enough  to  offer  a  strong  opening  with- 
out relying  on  the  library.  It  excels  in 
the  middle  game,  and  even  in  the  end 
game  it  won't  get  lost  like  so  many 
other  chess  programs. 

Psion  Chess  is  quite  impressive  vi- 
sually as  well.  The  chess  board  and 
pieces  can  be  displayed  in  either  the 
conventional  two-dimensional  repre- 
sentation or  a  spectacular  three- 
dimensional  view  as  if  you  were  seated 
at  a  real  board.  To  make  a  move  with 
the  Macintosh  version,  you  use  the 
mouse  to  pick  up  the  piece  and  drop  it 
on  the  destination  square.  The  piece 
moves  smoothly,  and  in  the  3-D  view,  it 
realistically  passes  in  front  of  or  behind 
the  other  pieces. 

The  program  has  almost  every  fea- 
ture imaginable.  You  can  take  moves 
back,  set  up  any  position,  change  sides 
with  the  computer,  replay  all  the  moves 
of  the  current  game  from  the  beginning, 
save  a  game  on  disk,  print  out  the  move 
list  and  current  position,  ask  the  com- 
puter to  suggest  a  move  for  you,  and  set 
up  a  checkmate  problem  as  complex  as 
mate-in-eight  for  the  computer  to  solve, 
Play  against  the  computer,  against  an- 
other player,  or  watch  the  computer 
play  itself. 

During  a  game,  the  computer  re- 
cords a  list  of  the  moves  that  have  been 
made,  keeps  track  of  the  time  spent  by 
each  player,  displays  its  analysis  of  the 
game  indicating  which  side  it  thinks  is 
winning,  and  predicts  the  next  few 
moves,  There's  also  a  selection  of  50 
classic  games  drawn  from  150  years  of 
international  chess  which  can  be  re- 
played move  by  move. 

As  if  all  that  weren't  enough,  the 


drop-down  menus  can  be  displayed  in 
English,  French,  German,  Italian,  Span- 
ish, and  Swedish.  The  23-page  manual 
contains  only  three  pages  of  English, 
but  the  program  has  several  help 
screens  which  explain  the  features  in 
greater  detail.  You  can  use  the  program 
quite  easily  without  the  manual. 

Psion  Chess  is  an  impressive  pro- 
gramming achievement.  It  may  well  be 
the  best  chess  program  ever  written  for 
a  microcomputer, 

Psion  Chess 

Piion,  Inc. 

40  Lindeman  Drive 

Trumbull,  CT  06611 

$59.95 


Quest  Of  The 
Space  Beagle 
For  Atari 

Steve  Hudson 

Requirements:  Atari  400/800,  XL,  or  XE 
computer  with  at  least  48K  RAM  and  a 
disk  drive. 


First  came  Jupiter  Mission  1999,  a  pack- 
age that  combined  several  interwoven 
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games  under  one  title.  Now  there's 
Quest  of  the  Space  Beagle.  Despite  the 
fact  that  it's  a  sequel,  it  also  stands 
alone — admirably — and  if  you're  an  in- 
teractive fantasy  fan  it's  sure  to  become 
one  of  your  favorites. 

In  Jupiter  Mission,  you  left  Earth 
and  became  lost  in  space.  Now  you're 
the  sole  survivor  of  that  mission,  and 
you're  trying  to  -  get  home.  As  luck 
would  have  it,  you've  been  adopted  by 
the  Faunians,  who  are  about  to  be  in- 
vaded by  the  barbaric  Gentuzians.  For 
some  reason,  the  Faunians  have  decid- 
ed that  you  are  the  only  one  in  the 
entire  universe  who  can  save  them — so 
it's  you  and  the  Faunian  fighters  against 
the  entire  Gentuzian  fleet. 

You've  won  the  big  battle  and  have 
been  named  emperor.  But  to  see  if 
you've  got  the  right  stuff,  emperor- 
wise,  the  Faunians  dump  you  into  the 
smoothly  scrolling,  multicolored,  three- 
dimensional  Labyrinths  of  Kamerra. 
Find  your  way  out,  they  say,  and 
you've  not  only  proven  your  emperor- 


hood,  but  you're  also  free  to  head  for 
home.  What's  another  labyrinth  to  a 
seasoned  adventurer  like  yourself? 
Don't  worry.  It  only  holds  pits  and 
puzzles  and  Ardillian  Whipstingers  and 
Quardish  Sycophants. 

With  practice,  those,  too,  will 
prove  no  match  for  your  consummate 
cosmic  skills.  You'll  be  hailed  by  Faun- 
ians far  and  wide,  given  a  ship  and 
plenty  of  supplies,  and  sent  on  your 
way.  To  help  you  out,  you've  got  star 
maps — real  star  maps  that  show  an  ac- 
curate view  from  any  location.  You've 
also  got  a  captured  Gentuzian  hyper- 
drive  which  will  get  you  home  fast  if 
you  can  overcome  those  pesky  "tempo- 
ral perturbations"  that  get  in  the  way 
every  time  you  try  to  make  a  hyper- 
space  jump. 

Did  anyone  say  this  was  going  to 
be  easy?  Maybe  not,  but  it  will  surely  be 
spectacular.  The  game's  programmers 
have  used  some  pretty  fancy  techniques 
to  jazz  up  an  already  exciting  game,  For 
instance,  the  graphics  display  that  you 


see  during  the  space  battle  is  actually 
multiple  displays  combined  into  one. 
The  multiple  displays  alternate  60 
times  a  second,  treating  you  to  visuals 
that  would  otherwise  be  impossible  to 
achieve.  This  is  an  incredibly  realistic 
display.  Don't  be  surprised  if  you  jump 
away  from  the  screen  every  time  one  of 
the  bad  guys  comes  swooping  in. 

As  noted  in  the  instructions,  the 
price  you  pay  for  such  graphics  excite- 
ment is  a  slight  amount  of  flicker.  The 
flicker  is  more  pronounced  on  lower- 
quality  monitors  or  TV  sets.  However, 
on  each  of  the  monitors  tested  (includ- 
ing a  $59  black-and-white  TV)  the  flick- 
er was  all  but  eliminated  by  tweaking 
the  color  and  contrast  controls.  A  little 
extra  effort  is  required,  but  it's  well 
worth  it. 


Quest  of  the  Space  Beagle 
Avalon  Mil!  Microcontputer  Games 
4517  Hartford  Road 
Baltimore,  MD  Z1214 
$35 


Where  In  The  World  1$ 
Carmen  Sandiego? 
For  Apple 


Karen  G.  McCullough 

Requirements:  Apple  U-series  computer 
with  at  least  64K  RAM  and  a  disk  drive. 


FLASH  FROM  INTERPOL:  A  national 
treasure,  Aladdin's  Lamp,  has  been  sto- 
len from  Baghdad.  It  looks  like  the 
work  of  the  Carmen  Sandiego  gang. 
Your  assignment:  track  the  thief  to 
his/her  hideout  and  recover  the  trea- 
sure. You'll  have  to  work  quickly  and 
carefully,  though.  There's  not  much 
time  and  this  gang  plays  for  keeps.  If 
you're  the  detective  you  think  you  are, 
you  should  be  able  to  gather  clues  and 
decipher  them,  identify  the  thief,  and 
track  htm  down.  You  must've  thought 
you  were  pretty  good,  or  you  wouldn't 
have  signed  up  with  the  agency,  right? 
Crack  this  case  and  you'll  be  in  line  for 
a  promotion. 

Where  in  the  World  is  Carmen  San- 
diego?, a  mystery/adventure  game  from 
Brederbund  makes  you  the  detective, 
chasing  an  international  crook  from  one 
exotic  city  to  another,  gathering  clues  to 
help  identify  the  suspect,  and  finally 
cornering  him  in  his  hideout.  To  help 
you  crack  the  case,  you  have  the  ser- 
vices of  Interpol's  crime  computer  to 
identify  suspects  and  the  detective's 
best  friend — a  copy  of  the  World  Alma- 


nac and  Book  of  Facts  (included  in  the 
package).  Everyone  knows  that  good 
research  skills  are  as  important  to  a 
detective  as  his  shoulder  holster,  and 
you  get  plenty  of  opportunity  to  put 
yours  to  the  test.  When  an  informant 
tells  you  the  suspect  converted  all  her 
money  to  yen,  can  you  figure  out  where 
she's  going?  If  not,  you're  in  the  wrong 
business. 

Starting  the  game  is  as  easy  as 
booting  the  disk  and  entering  your 
name  into  Interpol's  computer.  Once 
the  computer  has  identified  you,  it 
gives  you  the  background  of  the  case 
and  whisks  you  off  to  the  scene  of  the 
crime  to  start  your  investigation.  When 
you  arrive  in  a  city,  you  have  four  op- 
tions: you  can  see  the  connections 
(those  are  the  places  the  suspect  could 
have  gone);  depart  by  plane  for  one  of 
those  destinations;  investigate;  or  visit 
Interpol  to  use  the  crime  computer. 

You'll  want  to  start  by  doing  some 
investigation.  In  each  city,  there  are 
three  places  you  can  go  to  gather  infor- 
mation about  the  suspect  and  where 
he/she  was  going.  Once  you've  collect- 
ed some  facts  about  the  thief,  the  crime 
computer  helps  you  identify  the  guilty 
part^'  and  issue  an  arrest  warrant  if 
you've  gathered  sufficient  data  for  a 
positive  identification.  You've  got  to 
have  a  warrant  or  the  suspect  will  slip 


through  your  fingers  on  a  legal  tech- 
nicality. 

The  Carmen  Sandiego  gang  is  a 
wily  bunch,  and  they  don't  sit  still  for 
long.  You'll  have  to  track  them  through 
a  number  of  cities  in  all  parts  of  the 
worid,  and  for  that  the  Almanac  is  es- 
sential. The  clues  can  be  as  subtle  as  the 
color  of  the  flag  flying  on  the  car  in 
which  the  suspect  is  believed  to  have 
departed. 

Where  in  the  World  is  Carmen  San- 
diego? is  an  entertaining  game  for  any- 
one from  fourth  grade  up,  and  even 
adults  will  learn  something  new.  The 
puzzles  are  different  each  time  you 
play,  and  become  even  tougher  as  you 
work  your  way  up  through  the  ranks. 
There  are  10  possible  suspects,  30  dif- 
ferent cities,  and  nearly  1,000  clues  to 
provide  a  variety  of  challenges.  The 
program  also  has  terrific  graphics,  clev- 
er animation,  and  some  of  the  best  mu- 
sic and  sound  effects  around. 

Attention  to  detail  is  what  has 
made  Brederbund  a  leader  in  the  home/ 
entertainment  software  business;  Car- 
men Sandiego  reflects  that  level  of  care. 
That  it  helps  teach  research  skills  and 
fundamentals  of  geography  as  well 
seems  almost  too  good  to  be  true.  This 
is  an  educational  game,  but  the  empha- 
sis is  on  the  game;  it's  entertaining 
enough  to  disguise  the  fact  that  you 
might  be  learning  something  while  you 
play. 

Where  in  the  World  Is  Carmen  Sandiego? 

Brederbund  Software 

17  Paul  Drive 

San  Rafael,  CA  9i903 

$39.95  © 
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Relax  and  Play  the 

Prizewinning  Computer 

Bridge  Programs 


For  Apple,  C64,  IBM  Compatibles 

Tom  Throop's  Bridge  Baron  J^ 

Wme;  of  the  First  Computer 

Bridge  Tournament 

Bid,  play,  or  bid  and  play  over  a 

million  random  deals  in  the  strongesi 

computer  bridge  playing  program 

available  on  mapr  computers, 
C64  $39.95       All  others  49.95 

Play  Bridge  with  Sheinwold® 

Winner  ol  the  Consumer  Electronic 

Softvjare  Award  1985 
Improve  your  declarer  play  as  you 
are  guided  along  correct  play  in  91 

challenging  deals  designed  by 

Alfred  Stieinwold  and  accompanied 

by  an  185  page  book  written  in  tiJs 

entertaining  style.  $29.95 

Please  add  S2  50  lof  poslage/handlmg 

VISA.  MaslefCard  Accepted 

(Include  card  #  and  exp  date) 


Great  Game  Products 

8804  Chalon  Drive 

Bethesda,  MD  ^0817 

1-800-426-3748 


LEARN 
PROGRAMMING 
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CENTER  FOR  COMPUTER  EDUCATION 


INSTITUTE 
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MASTER  COMPUTERS 
IN  YOUR  OWN  HOME 

^Jow  ynu  can  writs  proflrams  afxJ  get  a 
canixitef  io  do  |usl  wiiai  you  want  Get  ttie 
most  out  ol  any  cwnputer.  and  avoid  tiaving 
to  pay  tfie  ftigti  puce  ol  pte-packaged 
solTware 

LEARN  AT  YOUR  OWN  PACE 
IN  YOUR  SPARE  TIME 

to  Seam  atwot  «xnp«jiers.  operations,  ai^i- 
caliofis  aod  progiarrming  in  yoyr  spare  time. 
al  tone  Out  rotruclvs  provide  ^u  witri 
o^K^)n-«»  counseling 


LEARN  EVEN  BEFORE  YOU  DECIDE  ON  A  COMPUTER 

Everything  Is  explained  in  simple  langui^e.  Vou  willi  enjoy  learning  lo 
use  a  (OTiputef-EVEW  IF  YOU  DONT  ttVN  CWE  Learn  to  program  on 
Biy  peisonai  compuler.  IBM,  APPLE  COMMCOORE.  TRS.  and  mofB, 

BE  YOUR  OWN  COMPUTER  EXPERT 

Pmgrimnting  is  the  best  mi  In  learn  lo  use  computers,  and  we  can 
show  fiiu  UiG  besl-ariil  most  ecnnamicil-wsy  In  learn  programniingl 
Send  today  lor  your  tree  information  pacl^age.  No  obligation  No  ' 
salesman  will  call 


Save  Your 
Copies  of 
COMPUTE! 

Protect  your  back  issues 
of  COMPUTE!  in  durable 
binders  or  library  cases. 
Each  binder  or  case  is 
custom-made  in  flag-blue 
binding  witfi  embossed 
white  lettering.  Each  holds 
a  year  of  COMPUTE!.  Or- 
der several  and  l<eep 
your  issues  of  COMPUTE! 
neatly  organized  for  quici< 
reference.  (These  binders 
make  great  gifts,  tool) 


Binders  Cases: 

$8.50  each;  $6.95  each; 

3  for  $24,75;  3  for  $20.00; 

6  for  $48,00  6  for  $36,00 

(Please  add  $2.50  per  uni-f 
for  orders  outside  the  U.S.) 

Send  in  your  prepaid  order 
with  the  attached  coupon 


Moil  to:  Jesse  Jones  Industries 
P.O,  Box  5120 
Dept.  Code  COTE 
PhilQdelphio,  PA  19141 

Please  send  me COM- 
PUTE! D  cases  D  binders. 
Enclosed  Is  my  cneck  or  money 

order  for  S •  (U,S,  funds 

only.) 

Nome 

Address 

City 

State Zip 

Satisfaction  guaranteed  or  money 

refunded. 

Please  allow  4-6  weeks  for  delivery, 


nusic 
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CITY: STATE;  ZIP:  I 


HIGH  RISE 


Charles  McGuyer 


You're  a  construction  worker,  trapped 
in  a  partially  completed  high-rise 
building  after  dark.  Can  you  make  it 
safely  to  the  ground  floor  without 
being  snared  by  a  giant  bird  or  zapped 
by  the  patrol  robot?  This  unique  game 
was  originally  written  in  machine 
lariguage  for  the  Commodore  64. 
We've  added  new  versions,  also  writ- 
ten completely  in  machine  language, 
for  Atari  and  Apple  U-series  comput- 
ers. It's  one  of  the  best  arcade-style 
games  we've  ever  published,  particu- 
larly for  the  Apple.  A  joystick  is  re- 
quired to  play  the  64  version.  The 
Atari  version  also  requires  a  joystick 
and  runs  on  any  400/800,  XL,  or  XE 
with  at  least  48K  RAM. 


The  time  is  the  not-too-distant  fu- 
ture, and  the  place  is  a  downtown 
high-rise  building  under  construc- 
tion. You're  just  finishing  the  day's 
work  when  you  realize  that  it's  al- 
ready dark.  Everyone  else  has  gone 
home,  leaving  you  alone  in  a  shad- 
owy, multistory  maze  of  naked 
girders  and  bare  concrete.  A  chill 
creeps  down  your  spine  as  you 
think  about  the  recently  installed 
antitheft  robot.  It  patrols  the  struc- 
ture from  dusk  to  dawn,  automati- 
cally disposing  of  any  intruder  it 
might  find.  Even  worse,  the  half- 
completed  building's  shell  is  infest- 
ed with  nocturnal  birds  of  prey. 
They're  big  enough  to  carry  you 
away,  and  so  hungry  that  they 
roam  the  empty  structure  all  night 
long,  swooping  easily  from  one 
floor  to  the  next. 

Your  only  hope  is  to  use  the 
temporary  elevators.  They  move 
randomly  during  the  night  hours, 
going  up  and  down,  stopping  at 
some  floors,  skipping  others.  With 
skill  and  a  little  luck,  you  just  might 
evade  the  dangers  around  you  and 
make  it  safely  to  the  ground  floor — 
but  it  won't  be  a  cakewalk. 

Since  all  three  versions  of 
"High  Rise"  are  similar,  follow  the 
general  game  rules  under  the  Com- 
modore 64  instructions.  Then  refer 
to  the  specific  section  for  your  com- 
puter for  additional  information 
and  typing  instructions. 

Commodore  64  Version 

Because  the  64  version  of  High  Rise 
is  written  entirely  in  machine  lan- 
guage, you'll  need  to  type  it  in  with 


"MLX,"  the  machine  language  en- 
try program  listed  elsewhere  in  this 
issue.  Read  the  MLX  instructions 
carefully  before  you  type  in  and 
save  the  program.  Here's  the  infor- 
mation you'll  need  for  MLX: 

Starting  address:  COOO 
Ending  address:  CE7F 

After  you  save  High  Rise,  turn 

the  computer  off,  plug  a  joystick 
into  port  2,  then  turn  it  on  again. 
Load  the  game  with  LOAD"/!7e- 
name", S,l  for  disk  or  LOAD"/f/e- 
name", 1,1  for  tape,  and  enter  SYS 
49152  to  start  it  up  (substitute  your 
own  filename,  of  course). 

The  object  of  High  Rise  is  to 
make  your  way  to  the  ground  floor 
via  the  elevators  while  evading  the 
birds  and  patrol  robot.  When  the 
game  begins,  you'll  see  several 
floors  of  the  building  and  a  number 
of  elevators  moving  up  and  down. 
You  can  jump  on  any  elevator  that 
comes  to  your  floor  (move  into  the 
elevator;  it  picks  you  up  automati- 
cally), but  there's  no  way  to  control 
its  direction  or  how  far  it  goes. 
They're  just  temporary  elevators, 
used  to  transport  materials  and 
workers  during  daytime  hours.  The 
trick  is  to  catch  one  that's  moving  in 
the  direction  you  want,  and  get  off 
to  catch  another  before  it  starts 
moving  in  an  unwanted  direction. 

When  you  reach  the  lowest 
floor  shown,  the  screen  scrolls  up 
one  floor,  revealing  the  next  lower 
level.  Once  you  reach  ground  floor, 
the  player  sprints  off  the  screen  to 
safety  and  you  can  play  another 
game. 

The  patrol  robot  always  starts 
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on  an  upper  floor  and  moves  sys- 
tematically through  the  building, 
traveling  up  and  down  through 
special  shafts  that  are  closed  to  you. 
Designed  to  discourage  theft  and 
vandalism,  its  technique  is  simple 
and  effective:  It  pushes  any  intrud- 
ers (including  you)  off  the  building. 
If  it  runs  into  an  elevator  and  de- 
tects you  inside,  it  sends  a  high- 
voltage  charge  through  the  elevator 
shell  until  you  drop. 

Meanwhile,  the  birds  of  prey 
have  no  trouble  moving  from  one 
floor  to  the  next,  and  they'll  carry 
you  away  whenever  they  get  a 
chance.  Stay  as  far  from  an  ap- 
proaching bird  as  you  can,  since 
they  can  take  you  even  when 
you're  inside  an  elevator.  The  birds 
present  another  hazard  as  well. 
Whenever  one  of  them  hits  the  pa- 
trol robot,  the  hapless  fowl  is  im- 
mediately zapped  and  plummets 
straight  to  earth.  If  you're  caught  in 
the  path  of  a  falling  bird,  you'll  be 
knocked  down,  too. 

When  the  game  begins,  you 
have  five  players.  Each  time  you're 
zapped  or  fall  from  the  building, 
you  lose  a  player;  play  ends  when 
all  five  have  been  lost.  When  the 
game  starts,  you're  on  the  10th 
floor  of  the  building.  Moving  down 
a  level  earns  you  100  points.  If  you 
reach  the  bottom  safely,  you'll  have 
another  chance  to  play,  beginning 
at  a  higher  floor.  High  Rise  keeps 
track  of  the  highest  score  attained 
in  the  current  session,  as  well  as 
your  score  in  the  current  game. 

Atari  Version 

The  Atari  version  of  High  Rise  must 
be  typed  in  with  "Atari  MLX,"  list- 
ed elsewhere  in  this  issue.  Be  sure 
to  read  the  MLX  instructions  care- 
fully before  entering  and  saving  the 

program.  When  you're  ready  to 
save  the  program,  choose  the  MLX 
option  to  make  a  boot  disk  or  tape. 
Here  are  the  addresses  you'll  need 
for  MLX: 

Starting  address:  12288 
Ending  address:  14663 
Run/init  address:  12288 

Once  you've  made  a  boot  disk 
or  tape,  follow  the  instructions  in 
MLX  for  activating  the  program. 
This  version  of  High  Rise  is  quite 
similar  to  the  Commodore  64  game. 
However,  you  begin  at  the  15th 
floor  of  the  building  rather  than  the 
10th,  and  the  birds  aren't  zapped 
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when  they  meet  the  robot.  Also,  in 
this  version  the  robot  does  not 
shock  the  elevator. 

Apple  Version 

High  Rise  for  the  Apple  Il-series 
computers  must  be  entered  with 
the  "Apple  MLX"  machine  lan- 
guage entry  program  found  else- 
where in  this  issue.  Since  High  Rise 
loads  into  the  memory  area  normal- 
ly used  by  BASIC  programs,  you 
must  relocate  the  start  of  BASIC 
memory  before  loading  MLX  to  type 
High  Rise.  To  do  this,  enter  the 
following  line  in  direct  mode  (with- 
out a  line  number)  and  press 
RETURN: 

POKE  104,28:  POKE  7168,0:  NEW 

Then  load  and  run  MLX.  Follow  the 
MLX  instructions  carefully,  using 
these  addresses: 

Starting  address:  0801 
Ending  address:  IBDS 

After  you  finish  typing  High 
Rise,  save  at  least  one  copy  on  disk. 
Once  that's  done,  you  can  activate 
High  Rise  by  typing  BRUN  filename 
(substituting  your  own  filename,  of 
course). 

The  Apple  version  doesn't  in- 
clude birds,  so  the  patrol  robot  is 
the  only  hazard  you  need  to  avoid. 
Move  your  player  with  keyboard 
controls:  Press  the  left-arrow  key  to 
move  left,  right-arrow  to  move 
right,  and  the  space  bar  to  stop. 


Please  refer  to  the  "WLX"  articles  in  ttiis  issue 
before  entering  the  following  listings. 


"High  Rise"  for  the  Commodore  64  fea- 
tures smooth  machine  language  anima- 
tion and  eerie  sound  effects. 


Program  1: 
High  Rise 


Commodore  64 


C000:A9  00  AS    85    FB    A9  20    85    10 

ceea-.FC  a9  00  as  fd  a9  cb  85  7e 

C010SFE  fll  FD  91  FB  C8  D0  F9  F4 

C0ie:E6  FE  E6  FC  AS  PC  C9  24  52 

C020:D0  EF  AS  18  B9  EE  C9  99  52 

0028:00  D4  88  10  F7  A0  04  A9  E4 


C030 
C038 
C040 

C048: 

C050 

C058 
C060 
C068 
C0  7a 

00  73 
C080 
C088 
C090 
C09e 
C0A0 
C0A8 
C0B0 
C0B8 
C0C0 
C0Ca 
C0D0 
C0DS 
C0E0 
C0E8 
C0F0 
C0F8 
C100 
C108 
C110 
CH8 
C120 
C128 
C130 
CI  38 
C140 
C148 
C150 
C158 
C160 
C168 
C170 
C178 
C180 
C188 
C190 
C198 
C1A0 
C1A8 
C1B0 
C1B8 
G1C0 
C1C8 
01 D0 
C1D8 
C1E0 
C1E8 

01 F0 

01  F8: 
0200 
0208; 
0210 
0218: 
0220: 
C228; 

02  30: 

0238; 
0240; 
0248; 
C2  50: 
0258: 
0260: 
0268; 
0270: 
0278: 
0280: 
0288; 
0290; 
0298: 
C2A0: 
02  A8; 
C2B0; 
02  B8; 
C2C0: 
C208; 
C2D0: 
0203; 
C2E0: 


30  99  88 

E7  08  20 

51  CA  A9 

30  3D  60 

D0  8D  21 

88  C9  A0 

91  07  83 

20  DE  06 

20  8B  00 

07  8D  97 

40  6B  C0 

4C  AB  C0 

19  A0  00 
F0  IS  18 
FB  A5  FC 
93  00  60 

:A0  04  9D 

i9D  F8  06 

:1F  D0  EA 

F0  2D  B9 

B9  A6  09 

09  A2  04 

FB  CA  F0 

28  85  FB 

:FC  40  DD 

00  80  B0 
;9D  F8  07 

A9  FF  8D 

86  09  9D 
;AD  86  C9 

E0  0A  F0 

32  8D  86 

:D0  A9  0F 

;8D  26  D0 

:9D  00  D0 

09  69  38 

:F0  03  40 

87  09  A0 
:A2  06  B8 
;EB  09  A9 
;B8  8D  0B 

D0  AD  IE 

D0  A9  14 

D0  A9  SA 
;C1  SA  48 

D0  FD  CA 

AC  98  09 

D0  F0  09 

;8C  98  09 

09  20  61 

;98  09  60 

105  C9  04 

iSD  18  D4 

:A2  00  20 

:20  69  04 

;01  20  6B 

IB  05  20 

20  2F  08 
F0  41  90 
D0  BD  01 
20  61  02 
09    BD  00 

01  BD  89 
61  02  20 
00    C9  40 

88  09  9D 
40  DA  01 
D0  09  40 
40  DA  CI 
90  89  C9 
CI  ES  E8 
A2  00  60 
CD  0B  D0 
60  AD  00 
P0  ID  09 
8D  0B  D4 
60  AO  0A 
20  F4  02 
0A    D0  09 

03  20  AD 
0B  D4  A9 
80  8D  0B 
AD  54  CA 
CA  B9  0fl 
0C    CA  80 

04  04  08 
80  52  CA 


CA  38 

44  E5 

31  80 

OA  A9 

D0  8D 

04  B9 

10  F7 

AD  97 

18  AD 

C9  09 

A9  01 

A9  04 

A9  IC 

AS  FB 

69  00 

A2  00 

68  05 
9D  00 
AC  B0 
A6  C9 
85  FC 
A0  00 
10  18 
A5  FO 
C0  40 
09  A9 
E8  E0 
15  D0 
01  D0 

69  20 
03  40 

09  A9 
80  25 
A2  00 
E8  £3 
8D  87 
3D  01 

01  B9 

10  F7 
F0  8D 
D0  A9 
D0  A9 
SD  0E 
8D  FF 
A2  04 
D0  FA 
89  92 

08  00 
60  A9 
C2  60 
A5  05 
F0  07 
00  40 
91  01 
20  3B 
C2  20 
B2  04 
BD  88 

02  90 
D0  C9 
40  DA 

09  P0 
09  90 
9A  03 
DA  01 
89  09 
DE  01 
F0  06 
A9  00 
20  61 
E0  0A 
A0  05 
F0  04 
DO  29 

07  F0 
A9  85 

00  09 
20  AD 
17  F0 
02  60 
22  8D 
D4  60 
F0  01 
CA  SD 

01  04 

08  00 
A9  23 


10  FA 
A9  05 
5F  CA 
00  8D 
EB  09 
38  CA 
20  A7 
C9  35 
97  09 
24  F0 
SD  97 
85  FC 
91  FB 
69  28 
85  FC 
A9  ID 
90  30 

07  E8 
C9  C0 
85  FB 

08  80 
A9  IB 
AS  FB 
69  00 
C3  00 
80  A2 
05  D0 
A2  00 
ES  E8 
80  86 
0F  01 
FF  8D 
D0  A9 
AD  87 
18  AD 

09  E0 
A9  18 
5F  CA 
A9  00 
0A  D0 
7C  8D 
63  3D 
D0  8D 
07  40 
A0  00 
68  AA 
09  00 
05  F0 

02  9D 
A0  00 
09  3F 
60  A9 
B7  03 
20  09 

03  20 
03  01 
20  BD 

09  09 

10  FE 


E0 
01 


03  40 
88  09 
29  IF 
A9  01 
20  61 
D0  BD 
20  61 
9D  83 
02  40 
F0  01 
B9  92 
88  10 
0F  09 
0B  A9 
BD  FD 


F5 
02 


EA  20 
A9  81 
08  D4 
CE  54 
60  AO 


00 
A9 


20  F0 
8D  54 


20  88 

8D  95 

A9  8E 

20  86 

3D  00 

99  04 

07  D5 
FB  50 
69  47 
03  34 
C9  EC 
A2  A0 
CA  4fl 
85  4F 
40  10 
9D  D8 

06  02 
EB  B6 
0A  66 

08  04 
B0  3F 
91  E0 
69  EA 
85  00' 
A0  5F 
00  E4 
FB  B5 
AD  22 
18  21 
C9  Fl 
A9  B0 

10  lA 

02  03 

09  DF 

87  05 
0A  lA 
80  DO 
99  80 
8D  00 
A9  73 
00  88 

00  B7 
0F  10 

03  96 

88  F5 
60  99 

01  ED 
0D  87 

88  PS 
80  93 
F0  2E 

00  00 
60  E4 
03  B0 
A0  33 
20  A2 
C2  87 

01  40 

01  45 
25  6B 

00  77 
DA  AD 
20  86 
9D  83 
90  14 

02  15 

01  90 
C2  FS 
09  D6 
DA  03 
60  A2 
C9  53 
F5  21 
0B  SB 
00  76 

07  3  2 
F8  01 
AO  AO 

11  SE 
SD  34 
A9  28 
CA  42 
52  OF 

89  FF 
8D  CD 
09  AC 
CA  F7 


From  the  publishers  of  COMPUTE! 


February  1986 
COMPUTE!  Disk 


All  the  exciting  programs  from  the  past  three  issues  of  COMPUTE!  are  on 
one  timesaving,  error-free  floppy  disk  that  is  ready  to  load  on  your  Apple 
II,  11  +  ,  He,  and  lie  computers.  The  February  1986  COMPUTE!  Disk  contains 
the  entertaining  and  useful  Apple  II  programs  from  the  December  1985  and 
January  and  February  1986  issues  of  COMPUTE!.  This  easy-to-use  disk  also 
features  SpeedCalc,  the  spectacular  new  spreadsheet  program  written  en- 
tirely in  machine  language  for  the  Apple  Il-series,  and  the  latest  version  of 
SpeedScript,  the  bestselling  word  processing  program. 

The  February  1986  COMPUTE!  Disk  costs  $12.95  plus  $2.00  shipping  and 
handling  and  is  available  only  from  COMPUTE!  Publications. 

For  added  savings  and  convenience,  you  may  also  subscribe  to  the  COM- 
PUTE! Disk.  At  a  cost  of  only  $39.95  a  year  (a  $12.00  savings),  you'll  receive 
four  disks,  one  every  three  months.  Each  disk  will  contain  all  the  programs 
for  your  Apple  II  machine  from  the  previous  three  issues  of  COMPUTE!. 

This  is  an  excellent  way  to  build  your  software  library  while  you  enjoy  the 
quality  programs  from  COMPUTE!. 

Disks  and  subscriptions  are  available  for  Apple,  Atari,  Commodore  64  and 
128,  and  IBM  personal  computers.  Call  for  details. 

To  subscribe  to  the  COMPUTE!  Disk,  call  toll  free  1-800-247-5470  or  write 
COMPUTE!  Disk,  P.O.  Box  10036,  Des  Moines,  Iowa  50950. 


COMPUTE!  Publicationsjnc,® 
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0608 

BD 
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06 
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30 

F0 

0C 

4C 

24 

ceC0 
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00 

OE 
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D0 

A9 

SB 

8D 

28 

C358 

B0 

8D 

6E 

CA 

AC 

51 

CA 

A9 

FF 

C610 

B9 

05 

A9 

30 

90 

11 

05 

CA 

2A 

C8CB 

FF 

07 

20 

91 

CI 

20 

9A 

C8 

C5 

C360 
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BD 
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D4 

A9 

81 

8D 

0B 

D4 

20 

AA 

06  F0 

08 

00 

IF 

D0 

F9 

A9 

0A 

91 

20 

C9A8 

CB 

04 

AB 

05 

5B 

06 

3B 

07 

59 

C440 

91 

CI 

AC 

EC 

C9 

A9 

82 

99 

FA 

06  F8 

FB 

08 

00 

27 

D0 

F9 

18 

A5 

85 

C9B0 

00 

27 

28 

29 

E7 

EB 

E9 

BF 

10 

C448 

FS 

07 

80 

EC 

C9 

20 

9A 

08 

3D 

0700 

FB 

69 

28 

85 

FB 

A5 

FC 

69 

IF 

09  B8 

9F 

3F 

IF 

FF 

DF 

7F 

5F 

00 

SB 

C450 

8D 

08 

04 

20 

91 

01 

AC 

EC 

19 

C70a 

00 

85 

FC 

CA 

D0 

OC 

68 

AA 

BA 

C9C0 

04 

04 

04 

04 

04 

04 

04 

04 

54 

C458 

C9 

CA 

10 

00 

A9 

80 

99 

F8 

04 

0710 

60 

AD 

13 

07 

09 

IB 

F0 

06 

B0 

09  OB 

04 

04 

82 

54 

82 

54 

82 

54 

B3 

C460 

07 

8D 

0B 

D4 

63 

AA 

40 

42 

48 

0713 

A9 

IB 

BD 

DB 

07 

60 

A9 

IB 

DA 

C9D0 

82 

54 

20 

10 

20 

10 

20 

10 

51 

C468 

C3 

AD 

ED 

C9 

CE 

ED 

C9 

F0 

4C 

C720 

80 

C3 

07 

60 

A0 

05 

B9 

Bl 

80 

09  08 

20 

10 

00 

00 

00 

00 

FF 

C3 

44 

C470 

01 

60 

A9 

03 

3D 

ED 

09 

20 

CF 

C7  2a 

C9 

CD 

00 

00 

F0 

07 

83 

10 

63 

09  E0 

03 

FF 

08 

IC 

08 

10 

2A 

5D 

7B 

C478 

D5 

C7 

20 

24 

C7 

A0 

05 

B9 

A9 

0730 

F5 

AD 

IF 

D0 

60 

AO 

BF 

09 

lA 

09  E8 

14 

14 

IS 

00 

00 

14 

00 

00 

7E 

C480 

92 

C9 

OD 

0D 

D0 

F0 

04 

38 

2B 

C7  38 

D0 

38 

AD 

0D 

D0 

09 

E0 

F0 

25 

09  F0 

00 

00 

00 

45 

F0 

00 

00 

00 

60 

C48B 

10 

F5 

60 

AD 

9F 

C9 

00 

11 

55 

0740 

52 

AD 

EB 

09 

00 

14 

A0 

03 

99 

09  F8 

00 

00 

45 

F0 

00 

00 

00 

00 

44 

C490 

:AD 

0C 

D0 

C9 

FS 

F0 

04 

EE 

2D 

0743 

AD 

IF 

D0 

09 

B7 

09 

F0 

04 

FS 

OA00 

11 

58 

58 

00 

00 

02 

7F 

IE 

64 

C498 

:0C 

D0 

60 

A9 

01 

8D 

9F 

09 

4A 

0750 

88 

10 

F3 

60 

A9 

01 

SO 

EB 

A5 

CA08 

19 

IF 

15 

47 

05 

47 

05 

ED 

46 

C4A0 

:60 

AD 

0C 

D0 

C9 

16 

F0 

04 

E8 

C75a 

C9 

60 

EE 

00 

D0 

20 

9C 

C7 

9B 

CA10 

05 

47 

05 

47 

06 

47 

05 

0C 

72 

C4A8 

:CE 

0C 

00 

60 

A9 

00 

8D 

9F 

C4 

C760 

t60 

A9 

00 

8D 

EB 

C9 

AD 

IF 

64 

CA18 

07 

47 

06 

47 

05 

47 

05 

ED 

75 

C4B0 

:C9 

60 

CE 

EA 

C9 

AD 

EA 

09 

64 

C768 

D0 

AD 

9F 

09 

49 

01 

8D 

9F 

65 

CA20 

05 

47 

05 

47 

06 

47 

05 

00 

32 

C4B8 

:F0 

05 

C9 

14 

F0 

45 

60 

A9 

7D 

C7  70 

:C9 

60 

AD 

0D 

D0 

C9 

40 

F0 

A2 

CA28 

07 

47 

06 

IF 

15 

IF 

15 

IF 

34 

C4C0 

:83 

8D 

FE 

07 

A9 

88 

80 

FF 

56 

C77e 

:1A 

AD 

EB 

09 

00 

0E 

A0 

03 

9D 

CA3  0 

15 

IP 

15 

B5 

17 

B5 

17 

B5 

89 

C4C8 

:07 

A9 

29 

8D 

EA 

C9 

AD 

0P 

27 

C780 

:AD 

IF 

00 

D9 

BB 

C9 

F0 

OC 

lA 

CA38 

17 

B5 

17 

IE 

19 

IE 

19 

IE 

10 

C4D0 

;D0 

C9 

32 

90 

28 

09 

78 

B0 

3E 

0788 

188 

10 

F8 

60 

CE 

0D 

D0 

20 

PI 

OA40 

19 

IE 

19 

B5 

17 

B5 

17 

B5 

DB 

C4D8 

:24 

AC 

50 

CA 

B9 

07 

CA 

8D 

63 

C790 

:9C 

07 

60 

AD 

BF 

09 

49 

01 

FF 

0A48 

17 

B5 

17 

31 

DF 

87 

A2 

00 

2F 

C4E0 

:0E 

D4 

B9 

08 

CA 

80 

0F 

D4 

DO 

0798 

:8D 

BF 

09 

60 

EE 

SB 

09 

AD 

86 

CA50 

00 

05 

00 

00 

19 

00 

F7 

DC 

BC 

C4E8 

!A9 

11 

8D 

12 

D4 

C8 

C8 

00 

7A 

C7A0 

:EB 

09 

09 

29 

F0 

BB 

60 

A0 

30 

CASS 

.00 

A4 

88 

6C 

50 

34 

18 

31 

04 

C4F0 

:04 

F0 

04 

8C 

50 

CA 

60 

A0 

11 

07  A8 

:04 

B9 

6F 

CA 

99 

01 

04 

B9 

D8 

CA60 

:30 

00 

00 

00 

00 

00 

0D 

07 

2F 

C4F8 

:00 

8C 

50 

CA 

60 

A9 

20 

3D 

03 

07  B0 

:74 

CA 

99 

39 

05 

B9 

79 

CA 

C5 

CA68 

:06 

05 

0E 

0B 

0A 

09 

Al 

13 

7F 

C500 

:12 

D4 

60 

A9 

34 

SD 

FE 

07 

CF 

C7B3 

i99 

51 

06 

B9 

7E 

CA 

99 

19 

31 

CA70 

:03 

0F 

12 

05 

00 

05 

0E 

20 

96 

C508 

:A9 

8A 

8D 

FF 

07 

60 

A9 

40 

0A 

C7C0 

107 

B9 

83 

CA 

99 

41 

07 

A9 

E8 

CA78 

:20 

06 

00 

0F 

0F 

12 

08 

09 

EB 

C510 

:8D 

00 

D0 

A9 

00 

ao 

EB 

09 

32 

C7  08 

:1E 

99 

D9 

05 

A9 

30 

99 

11 

AB 

CA80 

:07 

08 

20 

13 

03 

0F 

12 

05 

4E 

C518 

:4C 

50 

05 

AD 

0B 

00 

C9 

E0 

81 

C7D0 

:05 

88 

10 

D5 

60 

AD 

64 

CA 

Bl 

0AB8 

:30 

30 

30 

30 

30 

IE 

59 

4F 

47 

C520 

:F0 

01 

60 

BA 

48 

20 

3A 

09 

lA 

07  D8 

:D0 

15 

AD 

aF 

D0 

CD 

0B 

D0 

61 

CA90 

:55 

27 

56 

45 

20 

52 

55 

4E 

FC 

C528 

t8D 

01 

D4 

20 

91 

01 

38 

AD 

09 

C7Ea 

:B0 

37 

AD 

62 

CA 

D0 

0E 

20 

48 

CA98 

:20 

4F 

55 

54 

20 

4F 

46 

20 

EC 

C530 

:0B 

D0 

E9 

08 

80 

0B 

D0 

AD 

IB 

C7E8 

:9A 

08 

C9 

BF 

F0 

07 

60 

A9 

3B 

OAA0 

:4D 

45 

4E 

00 

00 

ID 

ID 

ID 

FC 

C538 

!0F 

D0 

C9 

32 

90 

05 

E9 

08 

50 

C7F0 

:eD 

80 

FF 

07 

60 

A9 

01 

BD 

54 

CAA3 

:1D 

ID 

50 

52 

45 

53 

53 

20 

81 

C540 

:8D 

0F 

D0 

AD 

00 

oe 

C9 

48 

D2 

C7Fa 

:62 

CA 

AD 

0F 

D0 

CD 

0B 

00 

B7 

CAB0 

i46 

49 

52 

45 

20 

54 

4F 

20 

6B 

CS4e 

:90 

C4 

38 

E9 

08 

8D 

00 

00 

54 

C800 

:F0 

IB 

EE 

0F 

00 

AD 

0E 

00 

C9 

CABS 

:50 

40 

41 

59 

20 

41 

47 

41 

ID 

C550 

:20 

OE 

C6 

20 

11 

07 

A0 

00 

67 

C80e 

;C0 

0A 

00 

F0 

10 

B0 

06 

EE 

6A 

OAO0 

:49 

4E 

00 

47 

52 

4F 

55 

4E 

CB 

C558 

:A9 

CI 

85 

FB 

A9 

07 

85 

FC 

0B 

C810 

:0E 

D0 

EE 

0E 

00 

CE 

0E 

00 

4A 

OAOB 

:44 

20 

46 

4C 

4F 

4F 

52 

2C 

9E 

C560 

:B9 

48 

OA 

80 

01 

D4 

A9 

11 

8D 

0818 

:60 

C9 

F0 

F0 

07 

OE 

BE 

00 

09 

CAD0 

.-59 

4F 

55 

27 

52 

45 

20 

53 

3F 

C56e 

=  80 

04 

04 

A9 

IC 

91 

FE 

18 

28 

0820 

:EE 

0F 

D0 

60 

A9 

00 

80 

62 

07 

0AD8 

:41 

46 

45 

00 

4E 

4F 

57 

20 

C7 

C570 

:A5 

FB 

69 

07 

85 

FB 

C9 

E4 

FF 

0328 

:CA 

A9 

20 

3D 

0F 

00 

60 

AD 

90 

CAE0 

:57 

45 

20 

47 

4F 

20 

41 

20 

89 

C578 

:F0 

03 

4C 

6B 

C5 

EE 

61 

CA 

F4 

ca30 

!64 

CA 

D0 

35 

AD 

0F 

00 

CD 

2D 

CAE8 

:4C 

49 

54 

54 

4C 

45 

20 

48 

06 

C580 

:AD 

A0 

C9 

CE 

A0 

C9 

10 

9D 

IB 

C3  38 

:0B 

D0 

B0 

IB 

AD 

0A 

D0 

CO 

50 

CAF0 

:49 

47 

48 

45 

52 

00 

FE 

00 

EA 

C588 

:A9 

04 

8D 

A0 

C9 

AD 

IE 

D0 

B7 

0840 

:0E 

D0 

90 

IB 

33 

ED 

0E 

D0 

37 

CAF8 

I  EC 

00 

EE 

00 

6E 

62 

02 

62 

46 

C59a 

:A2 

00 

A9 

ID 

9D 

00 

07 

Ea 

5B 

C84a 

:C9 

08 

B0 

0B 

38 

AD 

0B 

D0 

S6 

0800 

:00 

00 

00 

00 

00 

00 

00 

00 

97 

C598 

:E0 

IF 

00 

F6 

A9 

04 

SD 

A0 

FE 

i     C850 

:ED 

0F 

00 

09 

07 

90 

4D 

AD 

16 

CB08 

:00 

00 

00 

00 

0A 

AA 

80 

08 

A3 

52     COMPUTEI      FebruarY  1986 


CE10 
CB18 
CE20 
CB28 
CB30 
CB38 
CB40 
CB4B 
CB50 
CB58 
CB60 
CB68 
CB70 
CB78 
CBSB 
CB88 
CB90 
CB98 
CBA0 
CBAS 
CBB0 
CBB8 
CBC0 
CBCe 
CaD0 
CBD8 
CBE0 
CBE8 
CBF0 
CBFB 
CC00 
CC08 
CC10 
CC18 
CC20 
CC2e 
CC30 
CC38 
CC40 
CC48 
CC50 
CC58 
CC60 
CC68 
CC70 
CC73 
CC80 
CC88 
CC90 
CC98 
CCA0 
CCAS 
CCB0 
CCBS 
CCC0 
CCC8 
CCD0 
CCD8 
CCE0 
CCES 
CCF0 
CCF8 
CD00 
CD08 
GDIS 
CD18 
CD20 
CD2a 
CD3  0 
CD  38 
CD40 
CD48 
CD50 
CD58 
CD60 
CD68 
CD70 
CD7a 
CD80 
CD88 
CD90 
CD98 
CDA0 
CDAS 
CDB0 
CDB8 
CDC0 


:00  80 

:08  00 

[00  08 

:00  80 

r08  00 

I  80  03 

;40  10 

:04  04 

\0S  80 

:48  00 

=  90  48 

[00  ai 

:18  00 

t34  08 

;40  00 

;11  10 

:00  34 

lie  00 

:80  18 

;00  84 

:48  00 

[84  48 

:00  00 

:00  00 

ill  10 

:00  AB 

:00  00 

:20  00 

:00  20 

:00  02 

!00  00 

:00  00 

:44  40 

:00  Aa 

:00  00 

:20  30 

:00  20 

:00  02 

;00  00 

:00  00 

:0C  00 

:00  04 

:e0  00 

!2A  20 

:00  11 

:00  00 

:00  00 

:00  00 

:0C  00 

:00  04 

:80  00 

:05  00 

:00  44 

:40  00 

:00  00 

:00  00 

:0C  00 

:00  04 

:00  00 

:0S  00 

:00  05 

:00  00 

:00  00 

:00  00 

:30  00 

:00  10 

:C0  08 

:50  00 

!00  11 

!00  0C 

:00  00 

:00  00 

:30  00 

:00  10 

!00  02 

:50  00 

:00  30 

!00  03 

:00  00 

:0A  C0 

:00  3F 

:0F  14 

:00  00 

:00  80 

:00  00 

:00  00 

:00  00 


08  00 
80  08 
00  80 
03  00 

80  08 
00  80 

00  44 

01  04 
48  00 

81  la 

00  84 
IS  00 
84  48 
00  81 
10  10 
00  04 
la  00 
90  08 
00  30 
08  00 
84  48 
00  90 
00  00 
00  00 
00  00 
00  00 
10  00 
33  33 
00  00 
SA  00 
00  00 
00  00 
10  00 
00  00 

10  00 

0C  cc 
00  00 

SA  00 
00  00 
00  00 
00  33 
00  00 
AA  80 

03  22 
00  00 

11  00 
00  00 
00  00 
00  33 
00  00 
8A  20 
00  15 
00  00 
C0  30 
00  00 
00  00 
00  33 
00  00 
0A  30 
00  31 
00  00 

04  80 
00  00 
00  00 
00  CC 
00  00 
A2  00 
00  54 
00  00 
03  00 
00  00 
00  00 
00  CC 
00  00 
A0  00 
00  4C 
00  00 
10  00 
00  80 
00  03 
F0  82 
F0  00 

82  00 
08  82 
00  00 
00  00 
00  00 


80  08  00 

00  80  08 

08  00  80 

80  08  00 

00  80  08 
0A  AA  80 

01  01  10 
0A  AA  90 
84  18  00 
00  84  48 
08  00  80 
84  48  00 
00  90  48 
0A  AA  84 
44  40  04 
0A  AA  90 

81  48  00 
00  84  08 
48  00  90 

81  18  00 
00  81  08 
4A  AA  80 
00  00  00 
00  00  00 
00  11  11 
38  00  00 
33  33  30 
30  00  20 
A8  00  00 

02  AA  00 
00  00  00 
00  00  00 

10  04  44 
88  00  00 
0C  CC  C0 

C0  00  20 

AS  00  00 

02  AA  00 

00  00  00 

00  00  00 

00  00  04 

2A  00  00 

02  22  20 
30  00  15 

11  00  00 
00  FF  C0 
00  00  00 
00  00  00 
00  00  04 
0A  00  03 
00  2B  80 
00  00  44 
41  00  00 

03  00  C0 
00  00  00 
00  00  00 
00  00  04 
0A  00  00 
00  3A  80 
00  00  01 
14  00  00 
00  37  00 
00  00  00 
00  00  00 
00  00  10 
A0  00  02 

02  E8  00 
00  00  11 
41  00  01 

03  00  ca 

00  00  00 

00  00  00 

00  00  10 

A0  00  00 

02  AC  00 

00  00  40 

14  00  01 

00  DC  00 

00  02  A0 

30  00  0C 

0F  3F  28 

82  00  00 
02  00  80 
20  00  00 
00  00  00 
00  00  00 
00  00  00 


80  6D 
00  56 

03  4B 

30  85 
00  6E 
83  99 

04  70 
08  67 
80  16 
00  68 

03  E3 

31  2A 
00  FB 

83  F3 

10  76 
48  51 

84  FD 
00  F0 
18  02 
84  53 
00  97 
83  2F 
00  58 

11  71 
10  6B 
10  EE 
00  41 
00  EB 
88  5E 
FF  ID 
90  99 

04  AS 
40  37 

10  30 
30  01 

00  7  2 
88  9F 
FF  5E 
00  D9 
00  El 
00  2B 
A2  E6 
02  72 
00  4  D 

11  E7 
FF  BS 
00  lA 
00  22 
00  68 
0A  93 
00  7B 
00  9E 
40  AS 
00  27 
00  5A 
00  62 
00  AB 
0A  CD 
00  AD 
00  lA 
15  81 
FF  F7 
00  9B 
00  A3 
00  B0 
AS  61 
00  26 

00  S3 

01  ID 
00  D0 
00  DB 
00  E3 
00  F0 
m  9D 
00  53 
00  71 
50  13 
FF  4A 
00  6D 
FC  20 
FC  05 
14  07 

02  9F 
00  8E 
00  4C 
00  54 
00  5C 


CDC8 : 00 
CDD0!00 
CDD8 : CF 
CDE0:0F 
CDE8:00 
CDF0  :00 
CDFe:00 
CEa0:0C 
CE08:02 
CE10:00 
CE18!C3 
CE20:a0 
CE23:30 
CE30:00 
CE33:00 
CE40:00 
CE4a :  00 
CE50!30 
CE58:C0 
CE60J00 
CE68!20 
CE70:00 
CE78:00 


00  00 

00  32 
14  F3 
80  82 
80  02 
00  00 
00  00 
00  80 
00  C3 
0F  F0 
14  F0 
00  82 
80  08 
00  00 
00  00 
00  00 
m  00 
03  02 
14  F3 
30  32 
00  02 
00  00 
00    00 


00  00  00 
00  8C  3C 
30  32  0C 

02  82  00 
00  80  08 
00  00  00 
00  00  00 
30  00  02 

03  00  00 
82  0F  0F 
00  82  03 
0C  C2  00 
80  20  00 
00  00  00 
00  00  00 
00  00  00 
00  C0  00 
00  80  3C 
30  02  00 
02  BE  00 
00  80  03 
00  20  00 
00  00  00 


00  00  64 

32  3C  49 

F0  14  ID 

82  02  AF 

82  20  2E 

00  00  8C 

00  00  94 

A0  00  05 

0C  00  67 

28  Fa  AD 

30  14  4F 

80  02  E7 

00  08  10 

00  00  CD 

00  00  D5 

00  00  DO 

C0  30  6D 

82  30  31 

C3  14  B8 

BE  02  22 

02  23  Al 

00  00  0F 

00  00  16 


You  must  avoid  hungry  birds  as  well  as 
an  automatic  patrol  robot  in  the  Atari 
version  of  "High  Rise." 

Program  2:  Atari  High  Rise 

Version  by  Kevin  Mykytyn,  Editorial 
Programmer 
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13272:002 
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14032 

14088 

14094 

14100 

14106 

14112: 120 

14118:001 

14124: 001 

14130: 000 

14136: 033 

14142: 144 

14148: 000 

14154: 000 

14160: 024 

14166: 032 

14172: 024 

14178: 060 

14184: 048 

14170: 056 

14176:004 

14202:016 

14208:083 

14214:056 

1 4220: 040 

14226: 243 

14232: 030 

14238: 016 

14244: 046 

14250:037 

14256:000 

14262:047 

14268:000 

14274: 175 

14280: 101 

14286: 1 1 4 

14292:  1  1  1 

14273: 180 

14304: 167 

14310: 010 

14316: 003 

14322: 000 

1432B: 000 

14334: 006 

14340: 006 

14346: 162 

14352: 160 

1435S: 010 

14364:233 

14370:016 

14376:040 

14382: 000 

14388: 167 

14394: 136 

14400: 249 

14406:056 

14412:054 

14418: 244 

14424: 244 
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,  008 

,  055 
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008 
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,  007 

0  55 

024 
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095 

,141 

007 

055 
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008 

,  133 

,  123 

233 

0  5S 

14! 

008 

1  1  1 

,  !32 

208 

009 

224 

002 

,  150 

,  005 
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243 

055 

240 

,  109 

,  009 

016 
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243 

033 

,  084 

,  237 

035 

,  153 

,  000 

032 

,  167 

,  237 

055 

,  202 

,016 

1B4 

,200 

,  169 

,  000 

141 

239 

033 

,  230 

,240 

055 

,  169 

,  001 

141 

,027 

,  055 

169 

010 

141 

242 

144 

,  169 

005 

141 

23B 

055 

211 

,014 

141 

251 

055 

141 

069 

,055 

076 

032 

133 

636 

176 

,000 

169 

1  12 

153 

000 

160 

,200 

192 

003 

208 

248 

202 

,077 

133 

000 

033 

163 

177 

,200 

153 

000 

035 

200 

126 

,211 

153 

000 

03S 

165 

063 

,024 

105 

040 

133 

210 

062 

,21  1 

105 

000 

133 

211 

171 

,  192 

243 

20B 

221 

169 

073 

,  153 

000 

033 

200 

169 

241 

.  153 

000 

035 

200 

169 

177 

,  133 

000 

033 

200 

169 

215 

,  133 

000 

035 

200 

172 

218 

,  208 

24S 

169 

065 

153 

217 

,  033 

300 

169 

000 

153 

201 

,  035 

200 
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035 

153 

242 

,  035 

096 

165 

210 

133 

039 
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21  1 

133 

213 

160 
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212 

133 

000 

035 

237 

,  163 

213 

133 

000 

035 
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,212 

024 

105 

040 

133 

103 
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213 

105 

000 

133 

002 

,  200 

Z00 

192 

241 

20B 

178 

,  096 

173 

006 

055 

208 

206 

,  173 

032 

006 

056 

233 
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074 

120 

,  245 

055 

169 

005 

056 
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,245 

055 

024 
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■  141 

242 

055 

096 
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061 

,  000 

000 
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246 

,  000 
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252 

,000 

000 
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002 

,  000 

000 

001 

001 

002 

012 

,  000 
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002 

020 

,034 

050 

066 
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040 

22S 
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136 

168 

072 

096 

162 

,  144 

168 

001 

001 

001 

21  1 

,  001 

001 
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001 

044 
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045 
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049 

,026 
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00B 

002 
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153 

000 

067 

,  000 
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036 

047 

,  000 
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060 
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245 
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,  060 

044 

255 

17S 
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137 

,060 

024 

016 
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074 
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024 

048 

016 

056 

,016 

052 

056 

168 

068 
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,016 

056 
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024 

056 
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,  048 
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,056 
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064 
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,016 
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022 
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243, 

217, 
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204  , 
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045 

037, 
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000 
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0B6 

,  000, 
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000, 
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044. 

002 

,  047, 

050 

000 

000 

000. 

070 

,  167 

161. 

173 

165 

128 

214 

,  132 

165 

17B 

1  12 

1  14 

096 

,  115 

1  13 

064 
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034 

,  101 

098 

1  17 

1  16 

1  16 

100 

,110 

161 

128 

172 

167 

039 

,  180 

172 

165 

128 

168 

187 

,  167 

168 

163 

178 

001 

048 

,  100 

232 
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000 

000 

060 

,000 

000 

000 

000 

000 

239 

,  000 

000 

000 

000 

000 

242 

,  000 

000 

000 

173 

032 

197 

,201 

172 

144 

104 

173 

030 

,  033 

208 

099 

144 

077 

101 

,  032 

169 

001 

133 

217 

212 

,002 

185 

032 

006 

240 

1  29 

,  201 

180 

176 

006 

056 

139 

,  002 

153 

032 

006 

136 

078 

,238 

165 

2!0 

024 

105 

0  24 

,  133 

210 

165 

21  1 

105 

136 

,  133 

21  1 

032 

171 

054 

135 

,020 

133 

213 

160 

000 

235 

,208 

253 

19B 

213 

208 

250 

,202 

208 

204 

032 

133 

06B 

,032 

149 

051 

032 

171 

049 

,  169 

000 

133 

217 

206 

0B7 

,033 

206 

244 

055 

206 

068 

,055 

173 

239 

053 

024 

1  10 

14430: 

14436: 
14442J 
14448: 
14454: 
14460: 
14466: 
14472: 
I447B: 
14484: 
14490: 
14496: 
14502: 
14508: 
14514: 
14320: 
14526; 
14532: 
14538: 
14544: 
14550: 
14556: 
14562: 
14568: 
14574: 
14580: 
14586: 
14592: 
S459B: 
14604; 
14610; 
14616: 
14622: 
1462B: 
14634: 
14640: 
14646: 
14652: 
14658: 


103 
240 
055 
205 
031 
136 
016 
2  10 
173 
010 
173 
034 
000 
057 
073 
178 
133 
001 
006 
I  73 
021 
141 
006 
056 
004 
055 
000 
169 
005 
000 
005 
167 
104 
000 
055 
1B7 
205 
187 
14  1 


,  100 

>41 

239 

0SS 

173, 

,055 

105 

000 

1  41 

240, 

,  096 

076 

169 

000 

1  33, 

,  169 

064 

133 

206 

162, 

,  160 

000 

152 

145 

205, 

,  208 

251 

230 

206 

202, 

,  246 

096 

167 

000 

133, 

,  167 

064 

133 

21  1 

096, 

,  034 

006 

208 

007 

173, 

,210 

201 

003 

176 

022, 

,  006 

055 

240 

014 

206, 

,006 

173 

034 

006 

141  , 

,210 

208 

006 

076 

030, 

,238 

034 

006 

165 

216, 

,  128 

133 

216 

0!6 

052, 

,315 

30B 

013 

169 

003, 

,215 

173 

066 

006 

073, 

,141 

066 

006 

173 

018, 

,  205 

016 

006 

208 

017  , 

,014 

Z0B 

041 

00  1 

240, 

,  169 

00! 

141 

006 

035, 

,  000 

055 

30B 

01  1 

176, 

,  23B 

018 

006 

076 

236, 

,  206 

018 

006 

076 

206. 

,055 

240 

014 

173 

004, 

,  301 

003 

208 

036 

169, 

,  !4I 

000 

210 

240 

027, 

,012 

141 

004 

055 

1  74, 

,  055 

1B9 

14  I 

033 
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,  210 

238 

005 

055 

173, 

,  055 

201 

008 

20B 

003, 

,  000 

141 

005 

055 

076, 

,  104 

076 

162 

048 

173. 

,053 

208 

027 

1  73 

006, 

,  208 

024 

162 

003 

202, 

,024. 

055 

024 

105 

010, 

,032 

006 

176 

244 

232, 

,  024 

055 

024 

105 

003, 

,032 

006 

096 

000 

000, 

139 

1  13 
143 
027 
043 
077 
022 
251 
231 
002 
080 
042 
184 
120 
028 
221 
088 
0B7 
148 
1  17 
095 
043 
038 
052 
316 
148 
102 
043 
080 
181 
244 
234 
183 
251 
186 
179 
181 
204 
08  3 


The  Apple  version  of  "High  Rise"  is 
an  exceplional  arcade-style  game. 

Program  3:  Apple  High  Rise 

Version  by  Tim  Victor,  Editorial 
Programmer 


START 
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0801 

END  ADDRESS 
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A9 

00 

85 

EC 

A9 

80 

85 

ED 

AD 

0809: 

20 

DC 

13 

20 

A4 

IB 

20 

6F 

06 

0811! 

17 

A9 

20 

85 

E6 

BD 

E0 

IB 

BD 

0819: 

A9 

00 

3D 

D7 

IB 

8D 

D6 

IB 

05 

0821: 

A9 

28 

BD 

DD 

IB 

A9 

C0 

8D 

2E 

0829: 

DE 

IB 

20 

C7 

15 

A9 

40 

85 

45 

0831: 

E6 

20 

C7 

15 

A9 

00 

SD 

FE 

6E 

0039: 

IB 

8D 

FF 

IB 

2C 

57 

C0 

2C 

58 

0841: 

52 

C0 

2C 

54 

C0 

2C 

50 

C0 

8D 

0849: 

A9 

70 

3D 

FB 

IB 

A9 

0E 

BD 

B4 

0851: 

F9 

IB 

A9 

C4 

BD 

FA 

IB 

A9 

DE 

0859: 

0E 

8D 

FB 

IB 

A9 

00 

8D 

74 

El 

0861: 

0E 

8D 

ai 

0E 

BD 

BE 

0E 

8D 

3D 

0869: 

9B 

0E 

3D 

A4 

0E 

SD 

Bl 

0E 

DE 

0871: 

8D 

BB 

0E 

BD 

CB 

0E 

BD 

F6 

62 

0879: 

IB 

A9 

0A 

SD 

F4 

IB 

A9 

00 

03 

08B1: 

8D 

F3 

IB 

A9 

05 

BD 

9E 

0E 

FC 

0889: 

A9 

02 

3D 

84 

0E 

BD 

S5 

0E 

AS 

0891: 

8D 

86 

0E 

AD 

F6 

IB 

F0 

03 

AF 

0899: 

4C 

10 

0A 

A9 

01 

SD 

E3 

IB 

D0 

08A1: 

A9 

01 

SD 

E2 

IB 

A9 

00 

SD 

B3 

08  A9: 

E4 

IB 

ft9 

56 

3D 

ES 

IB 

A9 

71 

0BB1: 

00 

BD 

E6 

IB 

ft9 

00 

BD 

E7 

04 

08B9: 

IB 

A9 

01 

8D 

EC 

IB 

A9 

00 

El 

08Cl! 

3D 

ED 

IB 

8D 

EA 

IB 

A9 

13 

7A 

08C9: 

SD 

EE 

IB 

A9 

00 

SD 

Fl 

IB 

SF 

08D1: 

A9 

06 

80 

EF 

IS 

A9 

00 

8D 

F5 
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0BD9! 

F0  IB 

AD 

F3 

IB 

AC 

F4 

IB  AE 

0B91: 

90 

13 

D0 

FA 

A9 

00 

BD 

08E1: 

ac  F3 

IB 

6A 

90 

0D 

EE 

F3  C9 

0B99: 

IB 

2C 

EB 

IB 

10 

04 

ce 

08E9: 

IB  A9 

7C 

80 

E5 

IB 

A9 

3?  82 

0BA1: 

IB 

60 

EE 

Fl 

IB 

60 

A0 

08F1: 

SD  EE 

IB 

A9 

FF 

SD 

E9 

IB  A7 

0BA9: 

8C 

FC 

IB 

B9 

C5 

0D 

30 

0BF"?: 

A9  00 

SD 

F7 

IB 

20 

A4 

14  C6 

0BB1: 

AA 

CA 

8A 

99 

C5 

00 

4C 

0901: 

20  3C 

0D 

20 

45 

0C 

20 

81  Fl 

0BB9: 

0C 

18 

B9 

Bl 

00 

79 

C0 
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61 

lA 

20 

5A 

17 

20  30 

0BC1: 

99 

Bl 

0D 

C9 

06 

F0 

04 
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33  09 

20 

C0 

09 

20 

A4 

14  35 

0BC9: 

9E 

D0 

09 

3B 

A9 

00 

F9 

0919s 

20  6D 

15 

20 

Bl 

19 

20 

A7  15 

0BD1: 

0D 

99 

C0 

0D 

CC 

E9 

IB 

0921: 

0B  20 

09 

0B 

20 

BD 

0A 

20  BE 

0BD9i 

0B 

B9 

Bl 

0D 

IB 

69 

04 

0929: 

7B  0A 

AD 

F7 

IB 

F0 

CE 

4C  37 

06E1: 

E5 

IB 

00 

33 

B9 

Bl 

0D 

0931: 

94  08 

AD 

E5 

IB 

A0 

00 

C9  CB 

0BE9i 

69 

06 

CD 

E5 

IB 

90 

2S 

0939: 

A2  B0 

06 

69 

26 

CB 

4C 

38  45 

0BF1; 

05 

CO 

E5 

IB 

B0 

21 

09 

0941: 

09  98 

IB 

6D 

F3 

IB 

CD 

ES  68 

0BF9: 

0D 

CD 

E6 

IB 

00 

19 

B9 

0949: 

IB  F0 

73 

SD 

EB 

IB 

A2 

02  67 

0C01: 

0D 

CD 

E7 

IB 

D0 

11 

A9 

0951: 

8E  B4 

0E 

C9 

0A 

90 

0B 

EE  C7 

0C09: 

SD 

E2 

16 

BC 

E9 

IB 

B9 

0959: 

B4  0E 

E9 

0A 

4C 

54 

09 

69  56 

0C11: 

0D 

18 

69 

04 

BO 

E5 

IB 

0961: 

02  SD 

B5 

0E 

A9 

00 

ao 

Bl  B9 

0C19: 

Bl 

0D 

C9 

9E 

F0 

12 

3B 

0969: 

«e  98 

00 

52 

A2 

02 

FE 

84  37 

0C21: 

06 

F0 

0D 

E9 

26 

90 

II 

0971: 

0E  BD 

84 

0E 

C9 

0C 

D0 

08  93 

0C29: 

FA 

20 

C6 

18 

29 

E0 

00 

0979: 

A9  02 

9D 

84 

0E 

CA 

10 

EE  87 

0C31: 

20 

C6 

le 

4A 

4A 

99 

C5 

09B1: 
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SD 

81 

0E 

20 

35 

IB  AB 
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C8 

8C 

FC 

IB 

C0 

05 

F0 

0989: 

AD  F3 

IB 

D0 

28 

20 

05 

0E  Dl 
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4C 

AC 

0B 

60 

CE 

E3 

IB 

0991: 

AD  F4 

IB 

18 

69 

04 

BD 

F4  08 

0C49! 

IC 

AD 

E2 

IB 

F0 

03 

A9 
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CC 

0E 

AD 

CC 

0E 

C9  F5 
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2C 

A9 

30 

BD 
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IB 

EE 
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02 

80 

CC 
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IB 
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04 
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80 

CB 
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A9 

00 

BD 

E4 

IB 

AD 

E4 
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BD 

F7 

IB 

4C 

01 
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0A 

0A 
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E2 

IB 

F0 

09B9: 

CE  F3 

IB 

20 

EA 

15 

60 

AD  AF 

0C71: 

30 

00 

69 

FC 

85 

FA 

A9 

09CI: 

E5  IB 

3S 

ED 

EE 

IB 

C9 

08  F2 

0C79: 

69 

0C 
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F6 

4C 
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0C 
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C9 

EE 

30 

31 

AD 
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00 
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ED 

EF 

IB 
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FB 

4C 
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0C 

69 

DC 

85 

09D9: 
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FF 

30 

22 

20 

47 

IB  AF 
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A9 

00 

69 

0C 

85 

FB 

A0 
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20  CA 

00 

A9 

01 

8D 

F7 
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FC 

IB 

AD 
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IB 
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0E 
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EE 

CB 
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05 
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IB 
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01 

0A 
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IB 
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IB 
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E7 
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2C 
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90 

CI 

60 
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01 

01 
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20 
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01 

74 
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0A 

4C 
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12 

09 

01 

B0 

12 

01 

01 
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2C 

51 

C0 

4C 

D0 

03  26 
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12 

09 

01 

74 

12 

02 

01 

0A49: 

20  2E 

20 

53 

2E 

34 

07 

IB  9D 

0D01: 

12 

0A 

00 

74 

12 

01 

01 

0A51: 

ID  10 

IE 

IE 

0L 

19 

01 

IF  2B 

0009: 

12 

09 

04 

74 

12 

02 

01 

0AS9: 
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IC 

20 

14 

IF 

00 

20  70 

0011: 

13 

0A 

00 

74 

12 

01 

01 

0A61: 

A4  14 

20 

6D 

15 

20 

Bl 
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THE  AMAZING  VOICE  MASTER® 

Speech  and  Music  Processor 

^   Your  computer  can  talk  in  your  own 
voice.  Not  a  synthesizer  but  a  true  digitizer 
that  records  your  natural  voice  quality— and  in 
any  language  or  accent.  Words  and  phrases  can 
be  expanded  without  limit  from  disk. 

^  And  it  will  understand  what  you  say.  a 

^^    real  word  recognizer  for  groups  of  32  words  or 
phrases  with  unlimited  expansion  from  disk 
memory.  Now  you  can  have  a  two  way  conver- 
sation with  your  computer! 

^  Easy  for  the  beginning  programmer 

with  new  BASIC  commands.  Machine  language 
programs  and  memory  locations  for  the  more 
experienced  software  author. 

^   Exciting  Music  Bonus  lets  you  hum  or 
^^    whistle  to  write  and  perform.  Notes  literally 

scroll  by  as  you  hum!  Your  composition  can  be 
edited,  saved,  and  printed  out.  You  don't  have  to 
know  one  note  from  another  in  order  to  write 
and  compose! 

Based  upon  new  technologies  invented  by  COVOX.  One  low 
price  buys  you  ttie  complete  system— even  a  voice  conlrolled 
black-jack  game!  In  addition,  you  will  receive  a  subscription  to 
COVOX  NEWS,  a  periodic  newsletter  about  speech  tecfrnolagy, 
applications,  new  products,  up-dates,  and  user  contributions. 
You  will  never  find  a  belter  value  for  your  computer. 

L/IMLY    ^09.i7s}  includes  all  tiardware  and  software. 
For  teleptnone  demonstration  or  additional   information,  call 
(503)  342-1271.  FREE  audio  demo  tape  and  broctiure  available. 
Available  from  your  dealer  or  by  mail.  When  ordering  by  mail  add  $4.00 
shipping  and  tiandling  ($10.00  for  foreign,  $6.00  Cariada). 

The  Voice  Master  Is  available  for  the  C64,  C12B,  all  Apple  ll's,  and  Atari 
BOO,  eooXL  and  130XE.  Specify  model  when  ordering. 


I  For  Faster  Service  on  Credit  Card  Orders  only: 

ORDER  TOLL  FREE  1-800-523-9230 


COVOX  INC  (S03>  342.1271 

675-D  Conger  Street,  Eugene,  OR  97402 

Telex  706017  (AV  ALARM  UD) 


High-Speed  String  Searcii 

For  Atari  BASiC 


Tom  R.  Halfhill,  Editor 


Here's  a  short  machine  language  rou- 
tine that  adds  a  valuable  new  func- 
tion to  Atari  BASIC — a  high-speed 
search  that  can  find  any  string  of 
characters  within  a  larger  string  al- 
most instantly.  It  lets  you  add  ma- 
chine language  speed  to  BASIC 
databases  and  sorts,  and  a  sample 
address  book  program  shows  how.  For 
all  400/800,  XL,  and  XE  computers. 


Have  you  ever  dreamed  up  a  wish 
list  of  new  commands  for  the  ulti- 
mate BASIC  language?  Ideally,  this 
super-BASIC  would  combine  in  a 
single  package  the  best  features 
that  all  BASICS  have  to  offer, 

A  sure  way  to  collect  ideas  for 
this  wish  list  is  to  look  at  other 
BASICS.  For  instance,  IBM  BASIC, 
Amiga  BASIC,  Atari  ST  BASIC,  and 
other  large  BASIC  languages  have  a 
function  called  INSTR  {pronounced 
"in-string").  INSTR  rapidly  search- 
es through  a  character  string  and 
returns  the  position  of  any  substr- 
ing you  specify.  Once  you  know  the 
position  of  the  substring,  it's  a  sim- 
ple matter  to  retrieve  it  with  the 
usual  BASIC  string  statements. 

Atari  BASIC  lacks  an  INSTR 
function,  yet  needs  it  much  more 
than  most  other  BASICs  do.  Many 
BASIC  languages  don't  allow 
strings  longer  than  255  characters, 
so  you  can  write  a  search  routine  in 
BASIC  that's  not  significantly  slow- 
er than  BASIC'S  own  INSTR  func- 
tion. But  Atari  BASIC  allows 
character  strings  of  virtually  any 
length,  up  to  the  limit  of  available 
memory.  Although  you  can  write  a 


search  routine  in  Atari  BASIC  that 
simulates  INSTR,  it  would  take 
ages  to  find  a  substring  hidden  near 
the  end  of  a  really  long  string. 

The  answer,  as  usual,  is  to  mix 
BASIC  with  a  dash  of  machine  lan- 
guage: an  ML  routine  that  dupli- 
cates INSTR  and  works  in  a  flash. 

When  this  powerful  function  is 
combined  with  the  megastring  ca- 
pability of  Atari  BASIC,  all  kinds  of 
possibilities  arise — database  and 
sorting  programs  written  in  BASIC 
that  perform  at  near-ML  speeds, 
and  simulated  string  arrays  that 
really  let  you  retrieve  any  substring 
as  fast  as  true  Microsoft-style  string 
arrays.  With  the  INSTR  routine  ac- 
companying this  article,  it's  a  snap. 

No  Memory  Confusion 

Take  a  look  at  Program  1.  It's  a 
BASIC  loader  that  encodes  the  ma- 
chine language  INSTR  routine  in 
DATA  statements,  ready  to  merge 
with  your  own  programs.  Because 
the  ML  is  written  to  be  completely 
relocatable,  you  can  add  this  rou- 
tine to  any  BASIC  program  without 
worrying  about  memory  conflicts — 
it  avoids  such  overused  memory 
areas  as  page  6.  Line  10,  which 
should  be  near  the  beginning  of 
your  program,  reads  the  machine 
language  into  a  string,  ML$.  Then  it 
uses  Atari  BASIC'S  string-address 
function  (ADR)  to  set  the  variable 
ML  equal  to  the  starting  address  of 
ML$.  After  this  setup,  all  it  takes  to 
call  the  INSTR  routine  is  a  simple 
USR  statement  with  a  few  argu- 
ments arranged  in  this  format: 

INSTR=USR(ML,ADR(XXS),LEN(XXS), 
ADR(S17BS),LEN(SI/BS),START) 


where  XX$  is  the  larger  character 

string  you're  searching  through, 
and  SUB$  is  the  smaller  substring 
you  want  to  find.  The  result,  re- 
turned in  the  variable  INSTR,  is  the 
position  within  XX$  of  the  first 
character  in  SUBS.  (Of  course,  you 
may  use  any  variable  names  you 
prefer  in  the  USR  statement,  as  long 
as  the  statement  conforms  to  this 
general  format.) 

For  instance,  if  XX$  contains 
these  characters: 
ABCDEFGHELLOABCDEFG 

and  if  SUB$  contains  these  charac- 
ters: 
HELLO 

the  result  of  calling  the  INSTR  rou- 
tine would  be  INSTR =8,  because 
the  substring  HELLO  begins  at  the 
eighth  character  position  in  XX$.  If 
you  redefine  SUB$— say,  SUB$  = 
"DEF" — and  call  the  routine  again, 
the  result  would  be  INSTR =4,  be- 
cause the  substring  DEF  begins  at 
the  fourth  character  position  in 
XX$. 

The  rest  is  easy.  Once  you 
know  a  substring's  position  within 
a  larger  string,  you  can  retrieve  it 
with  a  statement  like  this: 

PRINT  XX$aNSTR,INSTR-l-LEN 

(SUB$)-1) 

To  make  the  Atari  INSTR  rou- 
tine even  more  useful,  it  has  one 
additional  feature.  Looking  again  at 
the  USR  statement  above,  you'll 
notice  another  argument  that 
wasn't  mentioned.  This  argument, 
START,  also  was  inspired  by  the 
INSTR  function  in  larger  BASICs.  It 
lets  you  specify  the  starting  point  of 
the  search  within  XX$, 
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Normally,  if  you're  searching 
through  the  entire  string,  you'd  set 
START  =  1  before  calling  the 
INSTR  routine.  But  there  may  be 
times  when  you  want  to  start  the 
search  elsewhere  within  XX$.  A 
prime  example  is  when  you're 
searching  for  more  than  one  occur- 
rence of  a  substring.  If  the  search 
always  began  at  the  first  character 
in  XX$,  the  INSTR  routine  would 
find  only  the  first  occurrence  of 
SUBS  every  time.  To  get  around 
this,  all  you  have  to  do  is  call  the 
routine  again  after  executing  a 
statement  such  as  5TART  = 
INSTR+1.  This  starts  the  next 
search  at  a  position  which  is  one 
character  past  the  point  where  the 
previous  search  stopped.  You  can 
repeat  this  procedure  to  find  as 
many  occurrences  of  the  substring 
as  you  want. 

A  Speed  Test 

When  programming  in  BASIC,  it's 
nearly  impossible  to  cause  a  system 
crash  or  lockup  unless  you're  guilty 
of  a  wayward  POKE,  But  in  ma- 
chine language,  unrecoverable 
crashes  are  much  more  common. 
Therefore,  the  INSTR  routine  is 
carefully  error-trapped.  If  it  does 
not  find  the  substring  you  specify,  it 
returns  a  zero.  If  you  include  the 
wrong  number  of  arguments  in  the 
USR  statement,  the  routine  clears 
the  6502  stack  of  all  faulty  argu- 
ments before  returning  to  BASIC, 
then  returns  a  zero. 

The  only  limitation  to  keep  in 
mind  when  using  the  INSTR  rou- 
tine is  that  the  substring  you're 
looking  for  cannot  be  longer  than 
255  characters — not  a  serious  limi- 
tation. The  string  you're  searching 
through  can  be  any  length,  of 
course. 

So,  just  how  fast  is  the  INSTR 
routine?  Wickedly  fast.  For  a  dem- 
onstration, enter  Program  2.  It  cre- 
ates a  monster  string  that  is  30,000 
characters  long — almost  all  of  the 
usable  program  memory  that's  left 
in  a  48K  or  64K  Atari  when  DOS 
and  BASIC  are  active.  (There  may 
not  be  enough  memory  to  run  this 
program  if  you're  using  a  non-Atari 
DOS  that  uses  more  RAM.)  This 
string  is  filled  entirely  with  X's,  ex- 
cept for  a  Z  at  the  thirty-thousandth 
position.  When  you  run  Program  2, 
it  uses  a  search  routine  written  in 


BASIC  to  find  the  Z.  Prepare  your- 
self for  a  long  wait.  It  takes  almost 
eight  minutes. 

Now  add  the  lines  in  Program 
3  to  the  INSTR  routine  in  Program 
1  and  repeat  the  test.  INSTR  finds 
the  Z  and  prints  it  on  the  screen  in 
about  two  seconds.  With  strings  of 
any  normal  length,  INSTR  works 
almost  instantly. 

Personal  Address  Book 

For  a  more  practical  demonstration 
of  INSTR,  delete  line  10  from  Pro- 
gram 1  and  add  the  lines  in  Pro- 
gram 4,  "Personal  Address  Book." 
This  is  a  simple  address  book  pro- 
gram that  uses  INSTR  in  two  ways: 
to  retrieve  any  entry  in  the  blink  of 
an  eye,  and  to  alphabetically  sort 
the  entries  when  dumping  the 
whole  list  to  a  printer.  Actually, 
Personal  Address  Book  is  a  skeleton 
program  that  with  some  more  work 
could  be  turned  into  a  full-fledged, 
general-purpose  filer.  And  thanks 
to  INSTR,  it  works  nearly  as  fast  as 
programs  written  entirely  in  ma- 
chine language. 

When  you  run  Personal  Ad- 
dress Book,  it  automatically  adjusts 
itself  to  hold  the  maximum  number 
of  address  entries  practical  with  the 
memory  available  in  your  com- 
puter. In  a  48K  or  64K  machine 
running  DOS  2.5,  there's  room  for 
more  than  24,700  characters  of 
data.  In  a  16K  machine  with  tape, 
there's  room  for  more  than  5,600 
characters.  You  can  check  how 
much  room  is  left  at  any  time  by 
selecting  option  2  on  the  main 
menu,  "Enter  a  new  name." 

Other  menu  options  let  you  re- 
trieve any  entry,  including  multiple 
entries  of  people  with  the  same  last 
name;  delete  any  entry;  call  a  disk 
directory;  print  out  the  entire  list  in 
alphabetical  order;  and  save/load 
address  files  with  disk  or  tape 
(when  you  see  the  prompt  DEVICE: 
FILENAME,  respond  D:filename.ext 
for  disk  or  C:  for  tape).  Screen 
prompts  make  all  these  options 
self-explanatory,  and  the  program 
is  error-trapped  against  common 
mistakes. 

Most  programs  of  this  type 
written  in  Atari  BASIC  simulate 
string  arrays  by  dividing  a  large 
string  into  many  substrings  of  equal 
length,  allocating  a  substring  for 
each  record.  This  makes  it  easier  to 


retrieve  an  individual  record,  be- 
cause the  position  of  its  substring 
within  the  larger  string  can  be 
readily  calculated.  Unfortunately, 
there  are  two  drawbacks  with  this 
method:  records  can't  be  longer 
than  the  substrings,  and  shorter  re- 
cords waste  memory  because 
they're  padded  out  with  blanks.  But 
Personal  Address  Book  gives  you 
the  freedom  to  enter  as  many  lines 
for  each  address  entry  as  you  want. 
You  can  even  include  short  notes  to 
yourself  as  part  of  the  entry,  such  as 
SAM'S  COUSIN  WHO  IS  A 
LAWYER. 

Since  Personal  Address  Book  is 
a  bare-bones  demo  program,  it  does 
have  a  few  limitations.  First,  the 
search  routines  are  case-sensitive.  If 
the  names  are  entered  in  uppercase/ 
lowercase  format,  such  as  "Smith, 
Margaret,"  a  search  for  all-upper- 
case "SMITH"  results  in  a  NOT 
FOUND  message.  Second,  if  you 
search  for  a  keyword  that  isn't  the 
first  word  in  the  record — such  as 
"Margaret"  in  the  previous  ex- 
ample— the  program  retrieves  only 
the  fraction  of  the  record  which 
starts  with  that  keyword.  This 
means  you  should  type  in  your  en- 
tries using  the  format  in  which  you 
plan  to  retrieve  them,  like  this: 

Smith,  Margaret 
604  Geronimo  Avenue 
Hometown,  New  York  10000 
(212>  555-1212 

To  retrieve  this  record,  you'd  select 
option  1  and  type  "Smith"  or 
"Smith,  Margaret," 

And  finally,  the  print  option 
sorts  the  names  alphabetically  by 
the  first  character  only,  so  "Smith, 
Margaret"  nught  not  be  printed 
before  "Smith,  Zelda"  or  even 
"Szabo,  Martin."  This  was  done  to 
keep  the  demo  program  as  short  as 
possible. 

Programming  Notes 

To  see  how  easily  search  routines 
are  written  with  INSTR,  examine 
lines  360-450  and  600-660.  Notice 
how  the  START  argument  is  updat- 
ed after  each  search  to  find  any 
following  occurrences  of  the  same 
keyword  (if  the  user  so  desires). 

Since  Personal  Address  Book 
accepts  records  of  any  size,  you 
may  be  wondering  how  it  figures 
out  the  length  of  each  record  after  it 
finds  the  specified  keyword.  The 
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answer  is  a  string  called  EOR$  (End 
Of  Record).  EOR$  consists  of  two 
carriage  returns,  and  it's  tagged 
onto  the  end  of  each  record  you 
enter  with  Personal  Address  Book. 
After  the  INSTR  routine  finds  the 
keyword,  it  searches  for  the  next 
occurrence  of  EOR$.  Then  it  re- 
trieves the  substring  between  those 
two  points. 

BASIC  programmers  should 
note  the  subroutines  starting  at 
lines  760,  850,  and  1170.  By  calling 
the  Central  Input/Output  (CIO) 
routine  built  into  the  Atari  operat- 
ing system,  these  BASIC  subrou- 
tines can  load  and  save  to  tape  or 
disk  at  machine  language  speed.  If 
you  study  the  REM  statements  and 
descriptive  variable  names,  it  isn't 
too  difficult  to  figure  out  how  these 
subroutines  work.  Just  be  sure  to 
read  the  machine  language  data  in 
line  1270  into  CIO$  before  calling 
the  CIO  subroutine  in  your  own 
programs. 

As  mentioned  above.  Personal 
Address  Book  is  a  skeleton  program 
intended  mainly  for  demo  pur- 
poses. You  can  add  more  options  of 
your  own  to  transform  it  into  a 
mailing-label  generator,  a  general- 
purpose  filer,  or  even  a  full- 
featured  database  manager.  With 
help  from  the  lightning-fast  INSTR 
routine,  the  results  can  be 
impressive. 

For  instructions  on  entering  these  listings, 
please  refer  to  "COMPUTE  !'s  Guide  to  Tvping 
In  Programs"  published  in  ttiis  issue  of 
COMPUTE!. 

Program  1 :  INSTR  Routine 
BASIC  Loader 

m   10     DIM     ML*(260):FaR     X=l     T 

Q     260:READ     0:ML4<X)=CH 

R»(fl):NEXT     X:ML=ftDR(ML 

*> 

PC  1275     REM     «t«     INSTR     ML     DAT 

A     «tt 
DK1280     DATA     169,0,133,212,1 

33, 213 
L£  1290  DATA  104,201,5,240,1 

8,141 
LC  1300  DATA  0,4,162,0,236,0 
FD  1310  DATA  4,208,1,96,104, 

104 
OH  1320  DATA  232,169,0,240,2 

43, 104 
8L  1330  DATA  14  1,5,4,104,141 

,4 
BJ  1340  DATA  4,104,141,3,4,1 

04 
OP1350  DATA  24,109,4,4,141, 

2 
rF1360  DATA  4,173,3,4,109,5 
BO1370  DATA  4,141,3,4,104,1 

33 
ED  1380  DATA  204,104,133,203 


, 104, 104 
IC1390  DATA  141,1,4,104,133 

,  206 
EP1400  DATA  104,24,109,4,4, 

133 
it  1410  DATA  205,165,206,109 

,5,4 
CC1420  DATA  133,206,165,205 

, 56, 233 
DJ  1430  DATA  1,133,205,165,2 

06, 233 
HO  1440  DATA  0,133,206,162,0 

,  160 
OK  1450  DATA  0,177,205,209,2 

03, 240 
DE  1460  DATA  37,173,2,4,56,2 

29 
CB  1470  DATA  205,141,0,4,173 

,3 
P£14a0  DATA  4,229,206,13,0, 

4 
JH1490  DATA  208,1,96,165,20 

5,  24 
OF  1500  DATA  105,1,133,205,1 

65, 206 
IC1510  DATA  105,0,133,206,1 

69,  0 
16  1520  DATA  240,209,232,236 

,1,4 
FB  1530  DATA  208,4,169,0,240 

,54 
EO  1540  DATA  200,177,205,209 

, 203, 240 
DE  1550  DATA  37,173,2,4,56,2 

29 
C6  1560  DATA  205,141,0,4,173 

.3 
PE1570  DATA  4,229,206,13,0, 

4 
JH15B0  DATA  208,1,96,165,20 

5,  24 
00  1590  DATA  105,1,133,205,1 

65, 206 
rC  1600  DATA  105,0,133,206,1 

69,  0 
18  1610  DATA  240,155,232,236 

,1,4 
IB  1620  DATA  240,4,169,0,240 

,  202 
6A1630  DATA  173,2,4,56,229, 

205 
LK  1640  DATA  14  1,0,4,173,3,4 
FI  1650  DATA  229,206,13,0,4, 

144 
lfE1660  DATA  30,240,28,165,2 

05,  56 
JA  1670  DATA  237,4,4,133,212 

,  165 
IP  1680  DATA  206,237,5,4,133 

.213 
LL  1690  DATA  165,212,24,105, 

1  ,  133 
DC  1700  DATA  212,165,213,105 

, 0, 133 
K 1710  DATA  213,96 

Program  2:  BASIC  Search 
Demo 

DP  10     Din     XX*(30000)  ,  SUB«  (10 

) 
EB  20     XX»="X":  XX«  (30000)  =XX» 

;XX*(2)=XX«: XX» (30000) 

=  ■■  Z  '■ 

EN  30    SUB*=-"Z" 

LI  40     FOR     X  =  l     TO     LEN(XXt) 

BP  50  IF  XX»(X,  X  +  LEN(SUB»)  -1 
)=SUB«  THEt^  ?  X:?  XX»( 
X, X+LEN(SUB«) -1 ) :END 

PK60     NEXT     X 

L6  70    PRINT     "NOT     FOUND":  END 


Program  3:  INSTR  Search 
Demo 

EA  20     DIM     XX«  (30000)  ,  SUB«  (10 

) 
EC  30     XX»="X"  :  XX»  (30000)  =XX» 

:XX«(2}-XX«:XX« (30000) 

=  "  Z  " 
IF40     SUB*="Z":START=1:  ?     "PR 

ESS  ANY  KEY  TO  START  S 

EARCH" 
HI  50  IF  PEEK  (764)  -255  THEN 

50 
PF  60  INSTR-USR  (ML,  ADR  (XX*)  , 

LEN(XX*) , ADR (SUB«) , LEN 

(SUBS) , START) 
NO70     ?    XX*  (  IMSTR,  INSTR  +  LEN( 

SUB*) -1 ) 
BIIB0     IF     IN3TR-0     THEN    ?     "NOT 

FOUND" 
EA90     END 

Program  4:  Personal 
Address  Book 


lit  1 10 

EE  120 

PJ  130 

m  140 

E'i  150 

6H  160 

DJ  170 

£0  180 


ILELEN=FRE(0) 
M  FILE*(FILEL 
IM  SUB* (255) , 
, FILENAME* ( 14 
) , ALPHA* (3) , P 
8) , C10*(7) , DA 
BOOK* (21 ) 
ODK*="PERSONA 
S  BOOK" 
PEN  #1,4,0, "K 
ICS  2;SETC0L0 
POKE  752, 1 
QSITION  2,2:? 
* ( 1 , 16) : POSIT 
#6; BOOK*  < 18 
PI  ease  wai  t .  . 
OR*  (  1 ) =CHR*  (  1 
(2) =CHR* (155) 
=  "SES^^EIS5I 


00-3:  D 
) 

*  (260 
EDR*  ( 
MPT*  ( 

*  (40) 


L  ADDRE 

• ": GRAP 
2,0,0 


t6; BOO 

)N  8,3 
!1  )  :  ? 


)  :  EQR 
ROMPT 


jniMsins 


i:r;>.;M^ia;LiM" 

FOR  X=l  TO  7:REA 
10* (X) =CHR* (A) : N 
FDR  X=l  TO  260:R 
: ML* ( X ) =CHR* (A) 
X: ML=ADR (ML*) 
?  CHR*  (  125)  :?  PR 
GET  #1 , A: IF  A=15 
N  230 
GOTO  210 
REM  tt»  MAIN  M 
POKE  a2,0:6RAP 
POKE  752, I 
FOR  X=l  TO  9:7 
8) ; : NEXT  X: 7  B 
OR  X=l  TO  10:? 
B) ; : NEXT  X : POK 
POKE  82, 10: ?  : 
etr 1  eve  a  name 
"2>  Enter  a  ne 
:  7 
Nft  260  ?  "3>  Delete  a 
ame":?  :?  "4> 
dress  book":? 
?  "5>  Save  acdd 
ok":?  :?  "6>  P 
dress  book":? 
Disk  directory 
POKE  82,8:''  •-•^ 


EC  190 
NJ  Z00 

FP  210 
BO  220 
KJ  230 

ON  240 


250 


D  A:  C 
EXT  X 
EAD  A 
NEXT 

0MPT4 
5  THE 


flC  270 

AD  2  80 
FO  290 

LI  300 

61  310 

m  320 


Ld 


u  *t« 

CS  0: 

MR*  (  1 
K*;  :  F 

HR*  (  1 
82,10 
"  1  >  R 
?  :  ? 
name  " 

old  n 
ad  ad 

ss  ba 

n  t  ad 

"7> 


LOSE  #1 : OPEN  #1,4,0, 
"K: " : GET  #1 , A: IF  A=25 
5  THEN  290 

ON  fi-4B  QDTD  330,470, 
580, 77  0, 8  60, 950, 1 130 

GOTO  290 

REM  *tl  RETRIEVE  A  NA 
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ME  »»* 

OA  630 

BET  #l,AiIF  A=155  THE 

DAY'S  DATE";: INPUT  DA 

EE  330 

POKE  a2,2:PaKE  752,0: 

N  230 

TE* 

?  CHR$  < 125)  :PDBITION 

en  640 

BOTD  630 

NO  980 

IF  LEN(DATE*)=0  THEN 

5,20:?  PROMPT* 

LN650 

RECORD=INSTR: BTART=IN 

230 

6F  340 

POSITION  2,10:?  "Name 

STR 

EP  990 

TRAP  1000:CLOSE  #2:0P 

to  retrieve" ; : INPUT 

flB660 

INSTR=USR(ML, ADR (FILE 

EN  #2,8,0, "P: ":60T0  1 

SUB* 

«) , LEN (FILE*) , ADR (EOR 

010 

JF  350 

IF  LEN(SUBS)=0  THEN  2 

«) ,LEN(EOR*) .START) 

Eft  1000 

?  CHR«(12S) :?  :?  "1/ 

20 

lie  670 

?  CHR*<125) SPOKE  752, 

0  ERROR  #";PEEK(195> 

JF  360 

START=1 

1:?  :?  FILE«(RECORD, I 

:TRAP  40000: CLOSE  #2 

AI  370 

INSTR=USR(ML, ADR (FILE 

NSTR^1):?  :?  "PRESSIB 

:BOTO  960 

*1 ,LEN(FILE*) .ADRCSUB 
»! jLENtSUBS) .START) 

II  6B0 

IJiM^i-miMTD  DELETE" 

AE  1010 

ALPHA* ( 1 )=CHR*  (  153)  : 
ALPHA* (2)=CHR* ( 155) : 

?  :?  "PREBB«:Jai(ir:77WFO 

KI  380 

IF  INSTR=0  THEN  POKE 

R  MAIN  MENU" 

START=1:TRAP  40000 

752,1:?  CHR« (125) ;PDS 

06  690 

BET  #1, A: IF  A=155  THE 

II  1020 

PRINT  #2;B00K*:PRINT 

ITIDN  5,10:?  "NAME  ND 

N  230 

#2; "UPDATED  "|DATE* 

T  FDUND":GOTO  420 

K8  700 

IF  A'=32  THEN  720 

:  X  =  65 

LN  390 

RECORD=INSTR:START=IN 

Hft  710 

GOTO  690 

10  1030 

ALPHA*(3)=CHR«(X) : IF 

STR 

IH  720 

GAP-INSTR-RECORD+2 

X>90  THEN  CLOSE  #2: 

PL  400 

INSTR=USR(ML, ADR (FILE 

DP  730 

FILE»(REC0RD-2,LEN(FI 

GOTO  230 

«),LEN(FILE*> , ADR (EDR 

LE«) )-FILE»(IN3TR,LEN 

on  1040 

INSTR=USR(ML, ADR(FIL 

*) ,LEN (EQR«) .START) 

(FILE*) ) 

E») .LEN(FILE») .ADR(A 

OK  410 

?  CHR*(1251:?  :?  FILE 

IH  740 

FILES-FILE* ( 1 , LENIFIL 

LPHA*) , LEN (ALPHA*) ,S 

*  (RECORD,  lNSTR+1 )  :?  : 

E*) -BAP) 

TART) 

?  "PRESS  SPACE  BAR  TO 

BK  750 

BDTD  230 

Et  1050 

IF  rNSTR>0  THEN  1070 

RETRIEVE":?  "NEXT  DC 

Lk  760 

REM  «**  LOAD  FILE  »»* 

UK  1060 

X='X  +  1:BTART  =  1:S0T0  1 

CURRENCE  OF  SAME  NAME 

81  770 

7  CHR*(125) iPOKE  752, 

030 

" 

0IPDBITION  5,201?  PRO 

E6  1070 

RECORD=INSTR: START=I 

LI  420 

POKE  752, 1 :?  : ?  PRDMP 

MPT* 

NSTR+2 

T$ 

OH  7B0 

POSITION  1,10:?  "DEVI 

SA  10B0 

INBTR=USR (ML, ADR (FIL 

m  430 

GET  #1 , A: IF  A=155  THE 

CEiFILENAME  TO  LOAD"; 

E«) , LEN (FILE*) , ADR (E 

N  230 

1  INPUT  FILENAME* 

OR*) , LEN (EOR») .START 

PL  440 

IF  A=32  THEN  START=ST 

PF  790 

IF  LEN(FILENAME*) -0  T 

) 

ART+l:GOTO  370 

HEN  230 

DP  1085 

IF  INBTR=0  THEN  X=X+ 

OJ  450 

GOTO  430 

CF  800 

TRAP  S20ICLOSE  #2:0PE 

1 : BTART=1:B0T0  1030 

Ff  460 

REM  *«*  ENTER  A  NAME 

N  #2, 4, 0, FILENAME*: LE 

KC  1090 

PRINT  #2,FILE* (RECOR 

ttt 

T  READ-1  :  X-32:  MAXLEN=> 

D+1 , INSTR-1) 

NL  470 

?  CHR$(125) :PDKE  752, 

FILELEN! aADR-ADR(FILE 

on  1  100 

IF  INSTR+2<=LEN(FILE 

0:Pat<E  82,2:?  :?  FILE 

•) 1 QOSUS  1 180 

*)  THEN  START=INSTR: 

LEN-LEN(FILE*) ; "  CHAR 

OJ  810 

CLOSE  «2! FILE*<TRUELE 

GOTO  1030 

ACTERB  FREE  IN  MEMORY 

N) -CNR* ( 153) : TRAP  400 

HJ  1110 

X=X+1:START=1:B0T0  1 

LS  480 

" 

HE  B20 

001 BOTD  230 

?  CNR* ( 125) : POKE  752, 

IE  1120 

030 

REM  ttt  DISK  DIRECTO 

?   :?   "PRESSH:JiAJII:4.-WAT 

THIS  PROMPT":?  "WITH 

li POSITION  3,10;?  "1/ 

RY  ttt 

OUT  INPUT  FOR  MAIN  ME 

0  ERROR  #" i  PEEK{195)  s 

II  1130 

TRAP  1140:?  CNR* ( 1 25 

HE  490 

NU" 

P03ITI0N  5,20:?  PRDMP 
T*i CLOSE  #2: TRAP  4000 

)  ; CLOSE  #2:0PEN  #2,  6 
,0. "D: «. *":FOR  X=l  T 

?  :?  "PRESSKTI=*il!ri-BAT 

ANY  NEXT  PROMPT":?  " 

0 

0  10000;6ET  »2,A:7  C 

WITHOUT  INPUT  TO  END 

OCB30 

BET  #1 , Ai IF  A=155  THE 

HR*(A)!;NEXT  X 

ENTRY" 

N  230 

HF  1140 

CLOSE  #2:?  PROHPTtsT 

KF  500 

?  : ?  "NAME"; : INPUT  SU 

HA  B40 

BOTO  830 

RAP  40000 

B« 

K  S50 

REM  »»*  SAVE  FILE  ttt 

HH  11S0 

GET  #1, A:  IF  A<  >155  T 

JES10 

IF  LEN(SUBS)=0  THEN  2 

IL  860 

POKE  752,0:?  CHR*(125 

HEN  1150 

30 

)  :P0BITION  3,  20:"^  PRO 

J6  1  160 

GOTO  230 

OC  520 

IF  LEN(FILE»)=0  THEN 

MPT* 

AC  1  170 

REM  ***  CIO  LOAD/SAV 

FILE»(LEN(FILE«)+1)=E 

PS  870 

POSITION  1,10:?  "DEVI 

E  ttt 

OR* 

CE: FILENAME  TO  SAVE"; 

CP  1180 

REM  CIO  LOAD/SAVE  re 

BBS30 

FILE* (LEN(FILE»)+1)=S 

: INPUT  FILENAME* 

quires  file#2  opened 

UB*:FILE* (LEN (FILE*) + 

PF  BB0 

IF  LEN(FILENAME«)=0  T 

.  READ=0  -for  save,  R 

1  )=CHR* ( 155) 

HEN  230 

EAD=1  far  load 

KK  540 

7  :?  "NEXT  LINE  OF  AD 

KB  890 

TRAP  910:CLD3E  #2:0PE 

FB  1  190 

REM  file#2,»20 

DRESS"; ! INPUT  SUB* 

N  #2, S, 0, FILENAME*:  LE 

BE  1200 

ICCDM=a34:  ICBADR  =  a36 

JICS50 

IF  LEN(SUB«)=0  THEN  F 

T  READ  =  0:  X  =  32:MAXLEN=. 

:  ICBLEN«=a40:  ICBTAT  =  B 

ILE* (LEN (FILE*) +1)=CH 

LEN (FILE*) : SADR=ADR (F 

35 

R» ( 155) : GOTO  230 

ILE*) : GDSUB  1180 

AO  1210 

H=INT(SADR/25&) ; L=SA 

5n560 

GOTO  530 

NS  900 

CLOSE  #2: TRAP  40000:6 

DR-H»256:P0KE  ICBADR 

Jfl  570 

REM  ttt     DELETE  A  NAME 

DTO  230 

+X,L:POKE  ICBADR+X+1 

*t* 

HE  910 

POKE  752, 1 : ?  CHR* (125 

,H 

FC  5B0 

?  CHR*(125) : POKE  752, 

) : POSITION  5,10:?  " 1/ 

FF  1220 

H-=INT(MAXLEN/256)  :  L  = 

0:POKE  82,2:?  :?  PROM 

0  ERROR  tt" ; PEEK ( 1 95 ) : 

MAXLEN-Ht256:P0KE  IC 

PT* 

POSITION  5,20:?  PROMP 

BLEN+X.L:PDKE  ICBLEN 

F«  590 

?  :?  "NAME  TO  DELETE" 

TSsCLOSE  #2:TRAP  40013 

+X+1 ,H 

;:INPUT  SUB«:IF  LEN(S 

0 

KB  1230 

POKE  ICCOM+X, 1 1-4«RE 

UB*)=0  THEN  230 

DC  920 

BET  #l,A!lF  A=135  THE 

AD: A-USR (ADR (CIO*) , X 

DL  600 

START=1: I NSTR=USR ( ML , 

N  230 

) 

ADR(FILE») ,LEN<FILE«J 

Hft  930 

GOTO  920 

LN  1240 

TRUELEN=PEEK ( ICBLEN+ 

, ADR(SUB«) .LENCSUBS) , 

«940 

REH  ««*  PRINT  FILE  »« 

X) +256»PEEK ( ICBLEN+X 

START) 

t 

+  1  ) 

K  6  10 

IF  1NSTRO0  THEN  650 

FL  950 

POKE  82,2:P0KE  752,0: 

KI  1250 

RETURN 

m   620 

POKE  752,1:?  CHR«<125 

?  CHR*{125) 

DH  126  0 

REM  ***  CIO  ML  DATA 

) :POSITION  5, 10:?  "NA 

OS  960 

?  :?  "BE  SURE  PRINTER 

ttt 

ME  NOT  FOUND":?  :?  PR 

IS  ONLINE" 

U  127  0 

DATA  104,104,104,170 

DMPT* 

P£  970 

?  :?  PROMPT*:?  :?  "TO 

,76.06,228            @ 
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IBM  Screen  Swapping 


If  you've  ever  needed  to  temporarily 
store  a  graphics  screen  for  later  recall 
in  a  program,  or  load  screens  from 
disk  and  flash  them  on  the  monitor 
whenever  you  want,  this  article 
shows  you  how.  The  programs  work 
on  any  IBM  PC  with  color/graphics 
adapter  and  BASICA  or  Enhanced 
Model  PCjr  with  Cartridge  BASIC. 


You  can  achieve  many  interesting 
effects,  including  animation,  by 
rapidly  switching  between  several 
graphics  screens  stored  in  memory. 
Unfortunately,  this  capability  isn't 
a  standard  feature  on  the  IBM  PC. 
With  help  from  two  very  short  ma- 
chine language  subroutines,  how- 
ever, you  can  write  programs  that 
swap  screens  almost  instantly.  The 
subroutines  copy  the  video  bitmap 
to  or  from  an  array  in  about  five 
thousandths  of  a  second,  much  too 
fast  for  the  eye  to  see.  In  fact,  this  is 
even  faster  than  the  video  monitor 
can  display  a  frame,  so  the  effect  is 
truly  instantaneous. 

To  get  started,  type  in  Program 
1  below.  It  creates  two  files, 
SCRNARRY.BAS  and  ARRY- 
SCRN.BAS,  which  contain  the  two 
machine  language  subroutines.  The 
first  routine  copies  the  video  bit- 
map to  an  array,  and  the  second 
copies  the  contents  of  an  array  to 
the  video  bitmap.  The  routines 
achieve  their  speed  by  treating  the 
bitmap  as  a  continuous  string  of 
16,192  bytes. 


Paul  W.  Carlson 


For  an  example  of  how  to  use 
these  routines  in  your  own  pro- 
grams, type  in  Program  2  and  save 
it  on  the  same  disk  with  SCRN- 
ARRY.BAS and  ARRYSCRN.BAS. 
Before  running  Program  2,  make 
sure  the  disk  is  in  the  active  drive;  it 
accesses  the  two  routines  as  it  runs. 
After  typing  RUN,  don't  press  any 
keys  until  you  want  to  halt  the 
program. 

You  should  see  three  multicol- 
ored spirals  drawn  on  the  screen. 
The  first  two  disappear  as  soon  as 
they're  completed,  and  the  third 
seems  to  rotate.  The  rotation,  of 
course,  is  an  illusion.  Here's  what 
happens:  In  the  split-second  be- 
tween the  time  the  first  two  spirals 
are  completed  and  then  erased, 
each  screen  is  copied  into  an  array 
by  SCRNARRY.BAS.  The  third  spi- 
ral is  also  copied  into  an  array.  Fi- 
nally, the  contents  of  all  three 
arrays  are  repeatedly  copied  to  the 


screen  by  ARRYSCRN.BAS  to  get 
the  rotating  effect.  Actually,  the 
program  requires  a  time-delay  loop 
to  keep  the  screen-flipping  from 
happening  too  fast. 

See  the  figure  below  for  an  ex- 
planation of  Program  2. 

Computerized  Slide  Show 

You  can  load  a  graphics  screen  from 
disk  directly  into  an  array  the  same 
way  Program  2  loads  the  machine 
language  into  arrays.  Why  would 
you  want  to  do  this?  Suppose  you 
had  saved  graphics  screens  from 
three  different  programs  on  disk 
using  statements  such  as  this: 

DEF  SEG  =  &HB800:BS AVE"/)  ;e«flm£" 
,0,16192 

with  filenames  of  PICl,  PIC2,  and 
PIC3,  You  could  then  use  Program 
3  to  display  a  "slide  show"  of  your 
creations. 


Explanation  of  Program  2 


Line 

20,30 

40-140 

150 


160-200 


210 


220-250 


Description 

Loads  the  machine  language  subroutines  into  the  STOA  and  ATOS  arrays. 

Draws  and  paints  three  spirals,  each  one  with  the  colors  shifted. 

GETSCRN  is  the  entry  point  for  the  subroutine  that  copies  the  screen  to  an 

array.  Important:  No  new  simple  variables  can  be  assigned  from  the  point 

GETSCRN  is  computed  to  the  point  it  is  used  in  a  CALL  statement.  Assigning 

simple  variables  causes  array  addresses  to  move. 

Copies  the  screen  to  array  SCRNl,  SCRN2,  or  SCRN3  after  each  spiral  is 

complete. 

PUTSCRN  is  the  entry  point  for  the  subroutine  that  copies  an  array  to  the 

screen.  The  same  note  for  line  150  applies  here  also. 

Repeatedly  copies  the  arrays  SCRNl,  SCRN2,  and  SCRN3  to  the  screen  untU 

a  key  is  pressed. 
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This  interesting  program  dis- 
plays one  screen  while  loading  an- 
other. Pressing  the  space  bar  (after 
giving  the  next  screen  time  to  load) 
displays  the  next  picture.  The  pro- 
grann  could  be  extended  to  accom- 
modate any  number  of  screens, 
even  prompting  you  to  change 
disks  if  necessary.  It  needs  only  one 
array  to  store  the  screens  no  matter 
how  many  you  want  to  display, 
since  it  stores  only  one  screen  at 
any  moment. 

Notice  that  the  statement 
LA=0  in  line  10  of  Program  3  pre- 
vents the  address  of  the  ATOS  ar- 
ray from  changing  after  it  is 
assigned  a  value  for  PUTSCRN  in 
line  30.  (See  the  note  for  line  150  in 
the  breakdown  of  Program  2.) 

Programs  4  and  5  show  the 
source  code  for  the  SCRNARRY 
and  ARRYSCRN  subroutines.  They 
aren't  required  for  use  with  Pro- 
grams 1-3;  they're  listed  so  ma- 
chine language  programmers  can 
observe  the  techniques  involved. 
An  assembler  is  required  to  enter 
these  listings. 

For  instructions  on  entering  these  listings, 
please  refer  to  "COMPUTErs  Guide  to  Typing 
In  Programs"  In  this  issue  of  COMpuTEI. 

Program  1 :  Screen 
Swapping  Routines 

6H    10    DIM    M<7)  ,J(6>  :DEF    SEG 

FK   20    FOR    N=0    TO    26:  READ    B 

NI    30    POKE    VARPTRCM(0)  )+N,B:NEXT 

BO   40    BSfiVE-'SCRNARRY",  VARPTRfM(0 

)  )  ,27 
BK  50    FOR    N=0    TO    22:  READ    B 
«L   60    POKE    VARPTR(J(0)  )+N,,B:NEXT 
BI   70    BSAyE"ARRYSCRN",VARPTR(J(0 

) ) ,23: END 
KE   80    DATA    6,30,7,30,139,236,184 

PD   90    DATA    184,142,216,185,160,3 

1,51,246 
DH    100    DATA    139,126,8,252,243,16 

5,31,7 
KN    110    DATA    202,2,0,6,139,236,18 

4,0 
KF    120    DATA    184,142,192,185,160, 

31,51,255 
QE    130    DATA    139,118,6,252,243,16 

5,7,202 
8P    140    DATA    2,0 

Program  2:  Spiral  Demo 

NK  10  DIM  SCRNl  (4048)  ,SCRN2  (4048 

),SCRN3(404B) ,ST0A(7) , ATOS 

(6) 
GJ  20  DEF  SEG:BLOAD"SCRNARRY"',VA 

RPTR(STDA(0) ) 
NK  30  BLOAD"ARRYSCRN",VARPTR(ATD 

S(0)  ) 
HJ  40  KEY  OFF:  SCREEN  1 :  COLOR  0,0 
FJ  50  FOR  C=l  TO  3:W=C:CLS 


m   60  TP-6. 283103: F  =  B0/TP:  I 

9:DB=TP/20:ft«0 
Prt  70  FOR  1  =  1  TO  9:B=0:fl=A+ 

ET(160, 100) 
SJ  80  FOR  J  =  l  TO  20:B=B+DB: 
LN  90  X  =  160+1.2»RtSIN(A+B)  : 

+R»C0S<A+B) 
LO  100  LINE  -(X,  Y)  ,3:NEXT 
JK  110  CIRCLE(160,  100)  ,96,; 

/2 
Pn  120  FOR  E-1  TO  9:A=A+DA 
FL  130  X  =  160*l.  ia»RtSIN(A)  : 

+.96»RtCDS(A) 
Fft  140  C=C  MOD  3+1: PAINT (X, 

3: NEXT  I 
FN  150  GETSCRN=VARPTR(STOA( 
6D  160  ON  W  GOTO  170,180,1': 
LC  170  CALL  GETSCRN(SCRN1  (( 

TO  200 
NK  1B0  CALL  6ETSCRN(SCRN2(e 

TO  200 
EC  190  CALL  GETSCRN(SCRN3(£ 
in   200  NEXT  C 

fiJ  210  PUTSCRN=VARPTR(ATaS( 
NB  220  CALL  PUTSCRN  (SCRNl  (C 

R  J=0  TO  100: NEXT 
PJ  230  CALL  PUTSCRN  (SCRN2  (6 

R  J=0  TO  100: NEXT 


Dfi=TP/ 

At 

240 

CALL  PUTSCRN (SCRN3 (0) ):F0 
R  J=0  TO  100: NEXT 

+DA:P5 

I1E 

250 

IF  INKEY*=""  THEN  220 

m 

260 

CLS: SCREEN  0: WIDTH  80: KEY 

:R=F*B 

ON: END 

:Y=100 

J.  I 

Program  3:  Slide  Show 

3: A=DA 

Demo 

FE 

10 

DIM  SCRN(404B),ATOS(6):LA= 

0 

DEF  SeB:BLOAD"ARRYSCRN",VA 

:Y=100 

HP 

20 

RPTR(ATDS(0) ) 

,Y),C, 

DD 

30 

PUTSCRN=VARPTR ( ATOS ( 0 ) ) : LA 
»VARPTR(SCRN(0) ) 

(0)  ) 

NA 

40 

BL0AD"PIC1",LA 

90 

FB 

50 

KEY  OFF: CLS: SCREEN  1 : COLOR 

0)  ):GD 

0,1 

AB 

60 

CALL  PUTSCRN ( SCRN (0) ) :BLOA 

0))  :(3D 

D"PIC2",LA 

6B 

70 

IF  INKEY«<>"  "  THEN  70 

0)) 

CS 

80 

CALL  PUTSCRN(SCRN(0) ) :BLOA 
D"PIC3",LA 

(0)  ) 

It 

90 

IF  INKEY«<>"  "  THEN  90 

0)1 :FD 

30 

100  CALL  PUTSCRN ( SCRN (0) ) 

LI 

110  IF  INKEYtO"  "  THEN  110 

0)):FO 

LF 

120  CLS: SCREEN  0: WIDTH  80: KEY 

ON: END 

Program  4:  SCRNARRY  Source  Code 

Note:  This  source  code  is  provided  for  information  only.  It  is  not 
required  for  Programs  1-3.  An  assembler  is  required  to  enter  this  listing. 


;   Thi3 

subrout 

ine  copies 

}   into 

a  BASIC 

array. 

CSEQ 

SEGMENT 

STQS 

PROG 

FAR 

ASSUME 

CS: CSEG 

PUSH 

ES 

PUSH 

DS 

POP 

ES 

PUSH 

DS 

MOV 

BP,SP 

MOV 

AX , 0BS00H 

MOV 

DS.AX 

MOV 

CX , 8096 

XOR 

SI,  SI 

MOV 

Di.acBP: 

CLD 

REP 

MOVSW 

POP 

DS 

POP 

ES 

RET 

2 

STOfl 

ENDP 

CSEG 

ENDS 
END 

Save  extra  segment 
Set  the  extra  segment 

eqaul  to  ttie  data  segment 
Save  the  data  segment 
Make  BP  point  to  the  stack 
Set  data  segment  to  beginning 

Q-f  video  RAM. 
Initialize  move  counter 
Initialize  source  index 
Init,  dest.  index  to  array  offset 
Set  direction  flag 
Move  the  display  to  the  array 
Restore  the  data  segment 
Restore  the  extra  segment 
Clean  up  the  stack 


Program  5:  ARRYSCRN  Source  Code 

Note:  This  source  code  is  provided  for  information  only.  It  is  not 
required  for  Programs  1-3.  An  assembler  is  required  to  enter  this  listing. 


ThiB  subroutine  copies 
to  the  video  display. 


csee 

SEGMENT 

ATOS 

PROC 

FAR 

ASSUME 

CS:  CSE(3 

PUSH 

ES 

MOV 

BP.SP 

MQV 

AX,06S00H 

MOV 

ES.AX 

MOV 

CX,8096 

XOR 

DI.DI 

MOV 

SI,6CBP] 

CLD 

REP 

MOVSW 

POP 

ES 

RET 

2 

ATOS 

ENDP 

CSEG 

ENDS 
END 

16192  bytes  from  a  BASIC  array 


; Save  extra  segment 

;Make  BP  point  to  stack 

; Set  extra  segment  to  beginning 

;    of  video  RAM. 

) Initialize  move  counter 

; Initialize  destination  index 

;Inlt.  source  index  to  array  offset 

;Set  direction  flag 

;Move  the  array  to  the  screen 

; Restore  extra  segment 

; Clean  up  stack 
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Speedy 
Strings 

For 
Commodore 


Tibor  Friedman 


Here's  a  fast  machine  language  rou- 
tine that  lets  you  load  large  amounts 
of  data  into  memory  very  quickly.  You 
can  use  it  zvithout  knowing  anything 
about  machine  language,  and  the 
demonstration  programs  include  two 
handy  disk  utilities.  A  disk  drive  is 
required,  and  a  printer  is  optional. 


In  Commodore  BASIC,  the  conven- 
tional ways  to  retrieve  information 
from  a  disk  are  the  GET#  or  IN- 
PUT* commands.  Though  GET*  is 
the  more  flexible  of  the  two,  IN- 
PUT* is  much  faster,  since  it  pulls 
in  an  entire  string  at  once  rather 
than  reading  one  character  at  a 
time.  Even  vrith  INPUT*,  however, 
reading  large  files  from  BASIC  can 
be  a  slow  and  tedious  process. 

"Speedy  Strings"  offers  a  fast- 
er alternative  which  you  may  find 
useful  in  a  variety  of  applications. 
Here's  the  idea:  First,  you  create  a 
string  array  in  memory,  making  ev- 
ery individual  array  element  the 
same  length.  Then  you  load  the 
array  data  from  disk  with  a  fast 
machine  language  (ML)  routine, 
putting  it  directly  into  the  already- 
established  array  elements.  Don't 
worry  if  that  sounds  a  bit  confus- 
ing— the  examples  show  you  how 
much  time  the  technique  can  save. 
And  you  don't  need  to  understand 


machine  language  to  use  the  rou- 
tine in  your  own  programs. 

Type  in  and  save  Programs  1, 
2,  and  3  on  disk  before  doing  any- 
thing else.  Then  load  and  run  Pro- 
gram 1,  which  demonstrates  the 
speed  difference  between  ordinary 
string  retrieval  and  the  Speedy 
Strings  technique.  The  program  be- 
gins by  creating  a  600-element 
string  array  and  filling  each  ele- 
ment with  a  string  that  consists  of 
20  spaces  (lines  100-120).  Then  it 
POKEs  the  ML  routine  into  memo- 
ry (line  130)  and  creates  a  disk  file 
of  string  data  (line  140),  Then  the 
program  calls  a  subroutine  that  re- 
trieves the  data  from  disk  and 
stores  it  in  the  string  array  using 
INPUT*  statements  within  a  con- 
ventional FOR-xNEXT  loop.  After 
displaying  the  time  elapsed  during 
that  operation,  it  retrieves  the  data 
using  the  Speedy  Strings  technique. 
As  you'll  see,  the  second  method  is 
considerably  faster. 

Before  you  can  call  the  ML  rou- 
tine to  load  the  data  from  disk,  you 
must  have  created  a  string  array  in 
memory  to  receive  the  data.  And 
the  array  elements  must  all  be  of 
equal  length  so  the  ML  routine 
knows  where  to  put  each  piece  of 
data.  When  creating  the  array,  you 
must  make  sure  that  every  string 
begins  with  a  space  (character  code 


32)  as  shown  in  line  120  of  Program 
1.  Otherwise  the  ML  routine  won't 
work  properly. 

Fast  Disk  Menu 

Program  2,  "Fast  Disk  Menu," 
demonstrates  a  practical  applica- 
tion of  this  technique.  Even  if 
you're  not  interested  in  the  tech- 
nique itself,  you  may  find  this  a 
valuable  addition  to  your  program 
library.  It  lets  you  quickly  scan  the 
directory  of  a  disk,  sort  it  alphabeti- 
cally if  you  like,  and  quickly  load 
any  program  shown  on  the  screen. 

When  you  run  Fast  Disk  Menu, 
it  reads  the  directory  of  the  current 
disk  and  displays  a  screenful  of 
informafion  in  much  the  same  for- 
mat as  if  you  had  entered  LOAD 
"$0",8  followed  by  LIST.  Each  pro- 
gram is  listed  by  name,  with  the 
familiar  PRG,  SEQ,  or  REL  type 
indicator  at  the  right,  Non-PRG 
files  are  highlighted  in  a  different 
color.  At  the  left  of  each  filename  is 
a  number.  If  the  disk  contains  more 
programs  than  the  screen  can  hold, 
you  can  press  the  space  bar  to  view 
the  rest  of  the  directory. 

To  load  and  run  a  program 
from  the  directory,  simply  press  the 
f  1  key  and  enter  the  number  of  the 
program  you  want  to  run.  It  auto- 
matically loads  and  runs,  replacing 
Fast  Disk  Menu  in  memory  (note 
that  this  works  only  for  conven- 
tional BASIC  programs  that  you 
can  start  with  LOAD  and  RUN). 
You  can  also  dump  the  directory  on 
a  printer  by  pressing  f5.  Before  do- 
ing this,  you  may  want  to  sort  the 
filenames  into  alphabetical  order 
by  pressing  f3. 

In  its  present  form.  Fast  Disk 
Menu  POKEs  the  ML  code  into 
memory  every  time  you  run  it.  By 
making  some  slight  modifications, 
you  can  resave  the  program  with 
the  ML  roufine  "pasted  onto"  the 
end  of  the  BASIC  program  itself. 
The  routine  beginning  at  line  620 
does  most  of  the  work  for  you.  Exe- 
cute this  routine  by  typing  GOTO 
630  and  pressing'  RETURN.  Re- 
place line  120  with  120  QQ  = 
(PEEK(45)  +  256*PEEK(46)  -  73). 
Then  delete  every  line  from  560  to 
the  end  of  the  program  and  resave 
it  as  you  would  any  other  BASIC 
program.  When  you  reload  and  run 
the  program,  it  already  includes  the 
ML  routine. 
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Fast  Disk  Catalog 

Program  3  uses  the  same  technique 
to  speed  up  the  process  of  catalog- 
ing a  number  of  disk  directories.  It 
catalogs  and  alphabetizes  as  many 
as  600  filenames  for  you  and  prints 
the  results  on  a  printer,  aligning  all 
the  information  into  three  neat 
columns. 

Whefn  you  first  run  Program  3, 

it  indicates  that  600  records  are 
available  for  storing  directory  infor- 
mation. To  read  a  disk  directory, 
simply  place  a  disk  in  the  drive  and 
press  R.  Afterward,  the  program 
shows  how  many  records  are  still 
available  for  storage;  how  many 
files  have  been  recorded,  in  total; 
how  many  files  were  found  on  the 
disk;  and  the  disk  ID. 

You  can  continue  this  process, 

inserting  new  disks  and  pressing  R 
to  read  their  directories,  as  long  as 
the  display  shows  there  is  record 
space  available  (or  until  you  run  out 
of  disks).  If  you  need  more  than  600 
entries,  increase  the  value  of  MM  in 
line  40.  Be  sure  you  have  enough 
space  allocated,  since  attempting  to 
add  entries  when  no  more  space  is 
available  will  crash  the  program. 

Once  you've  read  as  many  di- 
rectories as  you  want,  press  Q  to 
exit  this  portion  of  the  program  and 
proceed  to  the  next.  Just  as  in  Pro- 
gram 2,  the  filenames  are  displayed 
on  the  screen  with  non-PRG  names 
highlighted  in  a  different  color.  If 
the  screen  cannot  hold  all  the  file- 
names you've  recorded,  press  the 
space  bar  to  view  the  next  screenful 
of  names. 

At  this  point  you  can  print  out 
the  disk  directory.  Before  doing  so, 
you  may  want  to  press  the  f5  key  to 
alphabetize  the  master  directory. 
Then  press  fl  to  dump  the  directory 
on  a  printer.  The  master  catalog  is 
printed  in  three  columns,  with  the 
first  column  indented  a  few  spaces 
so  you  can  insert  the  printout  in  a 
three-ring  binder. 


For  insfoictions  on  entering  these  listings, 
please  refer  to  "COMPUTEI's  Guide  to  Typing 
In  Programs"  In  this  issue  of  COMPUTE!. 

Program  1 :  Speedy  Strings 
Demonstration 


100  MM=600:REM  MAX. 


MEMORY 

:  rem  9 


110  DIMF$(MM) jPRINT"(CLR}  SETT 
ING  UP  STRINGS  IN  BASIC" 

jrem  69 
120  FQRI=0TOMM:F?(I)=CHR$(32)+ 

"(19  SPACES }":NEXT!REM*  19 
SPACES=LEN  20     : rem  118 
130  GOSUB600:RI:M  LOAD  ML 

ir-em  129 
140  GOSUB300:REM  CREATE  A  FILE 
OF  STRINGS  ON  DISK t rem  98 
150  GOSUB400:REM  CONVENTIONAL 

[SPACE] RETRIEVAL  AND  TIME 

:  rem  8 

160  GOSUB200!REM  SPEEDY  STRING 

METHOD  :rem  41 

170  END  jrem  111 

200  PRINT"f2  DOWN]  SPEEDY  RETR 

lEVAL"  jrem  253 

210  TI?="000000":OPEN15,8,15!O 

PENl,a,0, "0!TEST  0,S,R"!SY 

S(332) iCL0SEl:CL0SE15 

srem  127 
220  C=PEEK(980)+256*PEEK(981) 

:rem  S3 
2  30  T$=TI?  :rem  11 

240  FORI=0TOC-1:PRINTI;F$(I) :N 

EXT  : rem  6  3 

250  PRINT,MID$(TS,3,2)": "RIGHT 

?(TS,2)  irem  27 

260  RETURN  : rem  120 

290  REM  CREATE  PILE     srem  83 
300  PRINT" (2  down) CREATING  A  T 

EST  FILE  AND  SAVING  TO  DIS 

K"  jrem  221 

310  FORI=0TOMM:F$CI)="*1234567 

890123456789" iNEXT:REM  *  2 

0  CHARACTERS         jrem  68 
320  OPEK2,3,2, "@0:TEST  0,S,W" 

: rem  7 1 
330  PORI=0TOMM:PRINT#2,F$(I) :N 

EXT :CL0SE2: RETURN   : rem  49 
400  PRINT" (2  DOWN}  CONVENTIONA 

L  RETRIEVAL"       :rem  197 
410  TI5="000000"!OPEN15,8,15:O 

PEH2,8,0, "0:TEST  0,S,R"iC= 

0  :rem  78 

420  IFST=64THEN440      : rem  58 
430  INPUT#2,F$(C) tC=C+l:GOT042 

0  $rem  8 

440  CLOSE2iCLOSEI5!T$=TI5 

;rem  6 
450  FORI=0TOC-l:PRINTI;F5Cl) :N 

EXT  I  rem   66 

460  PRIHT,MID$(TS,3,2)"t "RIGHT 

5(T$,2)  trem  30 

480  RETURN  -rem  124 

590  REM  *M/L  STRING  UPLOAD* 

l2  SPACES }RELOCATABLE/*SET 
#  OF  CHARACTERS  IN  STRING 

*  irem  205 

600  PRINT" {2  DOWN)  LOADING  ML" 

irem  32 
610  AD=832:FORI=0TO79:READDiPO 

KEI+AD,D:NEXT! RETURN 

rrem  22  3 
620  DATA169,255,I41,212,3,141, 

213,3,165,55        :rem  61 
630  DATA133,252,165,56,133,253 

,162,1,32,198,255   rrem  64 
640  DATA174,212,3,232,142,212, 

3,208,3,238,213,3,216,56,1 

65,252,233         srem  210 
650  DATA21tREM  STRING  LEN+1 

s  rem  72 
660  DATA133,252,176,5,166,253, 

202,134,253,32,207,255 

irem  52 
670  DATA164, 144, 208,18, 201,13, 

240,245,160,0,145,252,200, 

192  :r-em  122 


680  DATA20SREH  STRING  LEN 

:rem  238 
690  DATA240,209,32,207,255,208 
,244,32,204,255,96,0,0,0 

irem  138 

Program  2:  Fast  Disk  Menu 

100    POKE53280,6:POKE53281,6 

:rem   242 

110  PRINTCHR5(14)CHR5{8) rPRINT 
"[CLRllBLK}  tl0  DOWNHYEL}" 
SPC(12)"FAST    DISK    MENU 

: rem   160 

120  REM[2  SPACESjQQ=PEEK(45)+2 
56*PEEK(46)-73     : rem  158 

130  GOSUB5  70:QQ=AD      irem  78 

140  DIMF$(120):FORI=0TO120 

:rem  202 

150  F$(I)=CHR$(32)+" 

{20  SPACES }":NEXT:Y$=CHR$( 
34) :ZS=CHR$(190)     irem  4 

160  OPEN1,8,0, "5":SYSQQ:CL0SE1 

irem  10 

170  C=PEEK(0) iA=l      irem  167 

180  IFA=>CTHENA=1        irera  5 

190  PRINT" fCLR)  (DOWN  1 

[7  SPACES)(RVS}i83"Y$LEFT5 
(F5(0),16)YS"{3  SPACESJ"MI 
D?(F$(0) ,18,2)      trem  69 

200  PRINTiFORI=ATOA+S;IFI=>CTH 
ENPRINTJGOTO270    irem  230 

210  IFLEFT?(F5(I),1)=ZSTHENE=2 
iGOTO230  irem  201 

220  E=liIFMID?(F$(l) ,18,3)<>"P 
RG"THENE=2 iF? ( I )=a5+LEFT$ ( 
F$(I) ,20)  irem  55 

230  IFE=2THENPOKE646,3:GOTO250 

irem  63 

240  P0KE646,7  irem  200 

250  PRINTTAB(5)I;Y?MIDS(FS(I) , 
E,16)Y$;  irem  145 

260  PRINT"(3  SPACES }"MID$(F$( I 
) ,17+S,3)  irem  31 

270  PRINTiNEXT         irem  159 

280  PRINT" (DOWN) i8i( 5  SPACESlF 
1 -LOAD £3  SPACES )F3- SORT 
(3  SPACES )F5-PRINT"iPOKE19 
8,0iWAIT198,l      irem  211 

290  IFPEEK(197)=4THEN340 

irem  120 

300  IFPEEK(197)=5THEN390 

irem  118 

310  IFPEEK(197)=6THEN460 

irem  118 

320  IF  PEEK ( 1 97 ) =60  THENA= A+9 1 GO 
TO180  irem  60 

330  PRINT" (3  UP)"iGOTO280 

I  rem  39 

340  INPUT "{ DOWN H 5  SPACES) PROG 
RAM  t";NSiN=VAL(N$) !lFN<10 
RN>CTHEN190        irem  12 

350  F5=LEPr?(F$(N),16)srem  123 

360  IFRIGHT?(F$,1)="  "THENF$=L 

EFT$(F5,LEN(P$)-1) !GOTO360 

I  rem  115 

370  PRINT"{CLR)LOAD"Y5F?Y?",8 

1  rem  8 

380  POKE631,19:POKS632,13:POKE 
633,82  :POKE634, 117 1P0KE635 
,13iPOKE198,5:END    irem  8 

390  PRINT"[CLR)[5  DOWN) 

(8  SPACES )S( 2  SPACES )0 
(2  SPACES lR( 2  SPACES 3 T 
(2  SPACES  }_!( 2  SPACES  )N 
(2  SPACES }G        irem  217 

400  FORI=lTOC-2iIFF5(l)  ^FJd+l 
)THEN450  irem  168 

410  Q5=F?(I+1)        irem  167 

420  F0RJ=IT01STEP-liIFF?(j)<Q$ 
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THENF5( J+1 )=Q5  SGOTO450 

: rem  136 

430  F$(J+1)=F$(J) ;NEXT:rem  179 

440  F5U)=Q5  :rem  54 

450  NEXTI:A=1 tGOTO190   : rem  23 

460  PRINT" (CLR)  ( DOWN j IS  PRINT 

ER  ON7":POKE198,0:WA1T198, 

1  !GETHT5:IFMT$<>"'Y"THEN190 

: rem   7  7 

470   OPEN4,4,7  : rem   196 

480  PRINT#4,Y5LEFT$(F$(0),16)Y 
S"{3  SPACES}"MID?(F5(0),18 
,2)!PRINT#4,CHR?(20)CHR?(1 
5);  1  rem   38 

490   U=C-l:V=INT(U/3)+lsrem  236 

500  FORI=1TOV:FOEJ=0TO3 jQ=I+J* 
V!IFQ>UTHE^?5^0  :rem  84 

510  E=1:IFI,EFT5(F5(Q),1)  =  Z5THE 
NE=2  jrem  185 

520  PRINT#4,Y?HID5(F$(Q),E,16) 
YS  ,•  :  IFE=2THENPRIKT#4  ,  Z?  ; 

irera   176 

530  PRINT#4,"(5  SPACES]"; sNEXT 
!PRINT#4  :rem  190 

540  NEXT:CLOSE4:A=1:GOTO190 

:rem  178 

550  END  :rem  113 

560  REM  LOAD  ML         : rem  56 

570  AD=830:FORI=0TO72:READD:PO 
KE I + AD , D ; NEXT : RETU  RN 

:rem  219 

580  DATA169, 255, 133, 0,165, 55,1 
3  3,71,165,56,133,72,162,1, 
32,198,255,166,0,232 

srem  219 

590  DATA134,0,216,56,165,71,23 
3,22,133,71,176,5,166,72,2 
02,134,72,32,207,255 

srem  207 

600  DATA164,144,208,22,201,34, 
203,245,160,0,3  2,207,2  5  5,2 
01,34,240,249,145,71 

:rem  187 

610  DATA200,192,21,208,242,240 
,207,32,204,2  5  5,96,0,0,0 

: rem  117 

620  REM  *TO  TACK  H/L  TO  END  OF 
THE  PRGR.{3  SPACES)* 
{2  SPACESlFIRST:  RUN  630 
U  SPACES j*         :rem  49 

630  POKE45, ((PEEK(45)+73)AND25 
5) :POKE46,PEEK(46)-(PEEK(4 
5)<72)  :rem  195 

640  POKE47,PEEK(45) :P0KE48,PEE 
K(46) :POKE49,PEEK(45) :POKE 
50,PEEK(46)        srem  219 

650  AD=PEEKC45)+256*PEEK(46)-7 
3: RESTORE  : rem  3 

660  FORI=0TO72:READD:POKEI+AD, 
D:NEXT  : rem  42 

Program  3:  Fast  Disk 
Catalog 

10  POKE56,PEEK(56)-l iCLRjP0KE5 
3281,6:POKE53280,6      srem   28 

20    PRINTCHR9(14)CHR$(8)!PRINT" 
(CLR) [8    DOWN]", "(CYK)    FAST 
{space} DISK    CATALOG": rem    57 

25  PRINT, "18  D0WN)"TAB(14)"PLE 
ASE   WAIT" :GOSUB1010i rem    168 

30    AS="{D0WH)[CYN)(2    SPACES) 

Crvs)r{off}ead  a  disk  OR 

{RVS}Q{OFF)UIT"iX$="fUP} 

(24    SPACES) (2  UPJ"    srera   151 
40    MM=600:REM    MAX.    HEM. -UP   TO 

{SPACE} 16000  :rera   124 

50    DIMF?(MM) :A=0:EA=PEEK(45)+2 

56*PEEK{46) :AD=EA-373 

: rem   118 


60    FORI=0TOMM!F?(I)=CHR5(32)+" 
(20    SPACES) ":NEXT         : rem   90 
70    PRINT, " (CLR) ",, "{RVS}ROOM    F 
OR"MM"(LEFT)    RECORDS 

:rem   180 

75   PRINT" (yi:l}B2   SEIDES   @3#C0U 

ntSS  @3totalE3  @1avail.spac 

EB@3  :rem  61 

80    PRINTA?:POKE198,0:WAIT198,1 

:IFPEEK(197)=6  2THEN130 

:rem   119 

82    IFPEEK  (197)017  THENPRINTX5: 

GOTO80  ! rem   5 

85  PRINT"{UP}(5  SPACES )READING 

(9  SPACES)"         trem  73 

90  OPEN15,8,15, "10     srem  190 

100  OPENl,a,0,"?0"!SYS(AD):CLO 

SE1:CL0SE15       srem  126 

110  C=PEEK(980)+256*PEEK(981) 

I  rem   51 
120    PRINTX? SPRINT" fCYN) 

(2  SPACES) "RIGHT? (FS(C-l), 
2),C-B,C,MM-C!B=C:AD=EA-3  5 
7:GOTO80  I  rem   155 

130  IFA=>CTHENA=.:IFC=ATHEKPOK 
E198,0!END  :rem   244 

140  PRINT "{CLR}": FORI =AT0A+16: 
IFI>=CTHENPRINT:GOT0149 

trem   244 

143    PRINTTAB(5)"{CYN)"; ilFMID? 

(F?(I),13,1)<>"P"THENPRINT 

"tYEL}';  srem  149 

145    PRINTCHR5{34)LEFT$(FS(I),1 

6)CHR?(34);  :rem  11 

147  IFMID$(F5(I),18,1)<>"P"THE 
NPRINTTABC25)MID?(F$(I),18 
,2) ;  srem   74 

148  PRINTTAB(31)RIGHT5(F$(I),2 
)  : rem   11 

149  NEXT  irem  221 

150  PRINT, "{3    D0WH]{RVS}F5 
(OFF) -SORT {3    SPACES )TrVS If 
1 (OFF) -PRINT" sPOKEl 98 ,0 >WA 
IT198,1  :rem   132 

160  1FPEEK(197)=6AHDFL=0THEN19 
0  J  rem   75 

170    IFPEEK(197)=4THEN260 

I  rem   118 

180  A=A+17 :GOTO130  j rem   242 

190    FL^l jPRINT"{CLR)"SPC(250)" 

S{2    SPACES )0{ 2    SPACES }R 

T2    SPACES  )tT2    spaces  )I^ 

{2    SPACES )N{ 2    SPACES )G 

:rem   206 

200    POKE987,70iPOKE988,0iSYS(E 

A-261)  I  rem  64 

220  A=0:GOTO140  irem   74 

260    PRINT"{CLR}     {CYN){RVS) 

(2  SPACES }^S  THE  PRINTER  O 
N7 " t  POKEl 98 ,0 ; WAITl 98 , 1 

trem  127 
270   OPEN4,4,7  J  rem   194 

280    PRINT#4,"{5    SPACES )C    ATA 

L  o  g"«print#4,chr'5'(20Tch 

Rf(157;  srem  90 

290   U=C:V=INT(U/3)+l       srem   140 
300   FORI=1TOV:FORJ=0TO3 tQ=I+J* 

V  trem  222 

305    IFQ>UORLEFr$(F$(Q),l)="     "T 

HEN320  :rem   250 

310    PRINT#4,CHR?(34)LEPr?(F5(a 

),16)CHR5(34)"     "RIGHT${F?( 

Q),2)"{3    SPACES )"; I  rem   117 
320   NEXT:PRINT#4  srem   242 

330   NEXT!PRINT#4 iCL0SE4:A=.iGO 

TO140  (rem   197 

1000    REM    ML    LOADER  : rem   245 

1010    AA=832:FORI=0TO110iREADDs 

POKEAA+I,DsHEXT         srem    12 

1020   AD=PEEKCS5)+256*PEEK(56) 

I  rem   5  6 


1030    FORI=0TO2  55sREADDsPOKEAD+ 
I, DsNEXTs RETURN      srem  159 
1040    REM{2    SPACES }*R£AD    DISK* 

srem  68 
1050    DATA169,0,141,212,3,14I,2 
13,3,165,55,133,2  52,16  5,5 
6,133,253,234,162,1,32 

srem   2  31 
1060    DATA198,255,160,26,32,207 
,255,136,208,250,32,207,2 
55,133,254,32,207,255 

srem   213 

1070    DATA133,255,32,207,255,16 
4,144,208,60,201,3  4,208,2 
45,174,212,3,2  32,142,212 
s  rem   31 

1080  DATA3,208,3,238,213,3,216 
,56,165,252,2  33,22,133,25 
2,176,5,166,253,2  02,134 

E  rem  40 

1090  DATA253, 160, 0,32, 207, 255, 
2  01,34,2  40,249,145,2  52,20 
0,192,19,208,242    srem   203 

1100  DATA165, 254, 145, 252, 200,1 
65,2  55,145,252,192,0,208, 
189,32,204,255,96     srem   17 

1110   REM  *SORT*  srem  6  7 

1120  DATA173,219,3,41,127,141, 
219,3,173,220  : rem   103 

1130  DATA3,9,128,141,220,3,165 
,47,133,254,165       srem   203 

1140  DATA48, 133, 255, 160, 0,177, 
2  54,205,219,3,208,8,200,1 
77,254,205,220,3,240,3  0 

srem   31 

1150    DATA160,2,177,254,141,216 
,3,200,177,254,141,217,3, 
24,165,254,109,216,3,133 
: rem  8  3 

1160  DATA254,165,255,109,217,3 
,133,2  55,144,209,24,16  5,2 
54,105,7,141,216,3,165 

s  rem  3 

1170  DATA255,105,0,141,217,3,5 
6,173,212,3,233,1,141,212 
,3,173,213,3,233,0,141 

I  rem  20  7 

1180    DATA213,3,174,213,3,208,7 
,173,212,3,201,0,240,2  3,1 
73,216,3,133,254,173,217 
srem  66 

1190  DATA3, 133, 255, 169, 0,141, 2 
18,3,141,214,3,141,215,3, 
240,19,32,95,229,96,208 

!  rem  41 

1200  DATA198,24,165,254,105,3, 
133,254,165,255,105,0,133 
,255,160,1,177,254,133 

srem  249 
1210   nATA218,200,177,254,133,2 
19,200,200,177,254,133,22 
8,200,177,254,133,229 

srem  201 

1220   DATA160, 0,177. 218, 209, 228 

,240,4,144,36,176,7,200,1 

92,16,240,29,144,239,160 

trem  96 

1230   DATAl, 165, 228, 145, 2 54, 200 

, 1 65 , 229 , 145 , 2  54 , 2  00 , 200 , 

165,218,145,2  54,200,165 

t  rem  40 
1240    DATA219, 145, 254, 169, 1,141 
,218,3,238,214,3,208,3,23 
8,215,3,173,214,3,205 

srem  195 
1250    DATA212, 3, 208, 159, 173,215 
,3,205,213,3,208,151,174, 
218,3,240,140,208,142 

trem  134 
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Introduction  To 

AmigaDOS 

Part  2 


Charles  Brannon,  Program  Editor 


Last  month,  Part  1  covered  the  con- 
ventions of  AmigaDOS  and  explained 
its  most  useful  commands.  This 
month's  article  wraps  up  the  refer- 
ence guide  to  AmigaDOS's  interactive 
commands.  A  future  article  will  cover 
the  use  of  batch  files  and  batch  pro- 
gramming in  AmigaDOS. 


After  working  with  the  powerful 
AmigaDOS  commands  covered  last 
month,  you  may  decide  that  you 
prefer  working  with  the  Amiga- 
DOS  Command  Line  Interface 
(CLI)  instead  of  the  Workbench.  If 
so,  you  may  want  to  do  away  with 
the  Workbench  altogether.  It 
wastes  time  and  memory  to  load 
the  Workbench  every  session  mere- 
ly to  open  a  CLI  if  all  you  want  to 
use  is  AmigaDOS  anyway. 

Fortunately,  it's  fairly  simple  to 
create  an  AmigaDOS-only  disk. 
This  disk  can  be  used  whenever  the 
system  asks  for  a  Workbench  disk. 
You  probably  won't  want  to  modify 
your  original  Workbench  disk, 
however;  it's  better  to  modify  a 
copy  of  it  and  set  aside  the  original 
for  safekeeping.  You  can  make  sev- 
eral copies  of  your  AmigaDOS  disk 
for  future  use,  if  you  want.  Just 
follow  these  steps: 

A  Custom  DOS  Disk 

1,  open  the  System  drawer  on  the 
Workbench  disk.  If  you  don't  see 
the  CLI  icon — a  small  cube  labeled 
with  a  1>  symbol — run  Prefer- 
ences. (Otherwise  continue  to  step 
2.)  One  of  the  settings  on  the  first 
Preferences  screen  is  labeled  CLI 
[ON]  [OFF].  Click  it  ON,  then  click 
on  the  Save  box  to  save  the  change 
to  disk.  Return  to  the  Workbench 


and  reopen  the  System  folder.  You 
should  now  see  the  CLI  icon. 

2.  Double-click  on  the  CLI  icon,  A 
window  titled  "New  CLI  Window" 
appears.  Click  inside  the  window  to 
make  the  CLI  active, 

3.  At  the  1>  prompt,  type  ED 
S/Startup-Sequence  and  press  RE- 
TURN. This  loads  a  program  called 
ED,  a  full-screen  editor,  and  loads 
the  file  Startup-Sequence  from  the 
S  subdirectory.  Startup-Sequence  is 
the  batch  file  that  makes  Amiga- 
DOS  automatically  start  the  Work- 
bench when  you  boot  the 
Workbench  disk.  After  ED  starts, 
you  should  see  something  like  this 
on  the  screen: 

ECHO  "WorkBench  Disk.  Version  1.00" 

ECHO " " 

ECHO  'Xlse  Preferences  tool  to  set  date" 

ECHO " " 

LoadWb 

enddi  >  nil; 

These  are  the  batch  file  commands 
that  AmigaDOS  executes  each  time 
you  boot  up  the  Workbench  disk. 
The  ECHO  commands  are  similar 
to  PRINT  statements  in  BASIC; 
they  merely  display  messages  on 
the  screen.  It's  the  last  two  com- 
mands in  this  file  that  we're'inter- 
ested  in  changing. 

4.  Using  the  cursor  keys,  move  the 
cursor  to  the  line  with  the  LoadWb 
command  and  press  CTRL-B  twice 
to  erase  the  last  two  lines.  The 
batch  file  should  now  consist  of  the 
four  ECHO  commands  only.  If  you 
wish,  you  can  change  the  text  in  the 
ECHO  commands  to  give  your  boot 
disk  that  "personal  touch." 

5.  Press  the  ESC  key.  An  asterisk 
prompt  (*)  appears  at  the  bottom  of 
the  screen.  Type  X  at  this  prompt 


and  press  RETURN.  This  exits  the 
ED  program  and  saves  the  new 
Startup-Sequence  file  to  disk.  If 
you've  made  a  mistake  and  would 
like  to  start  over,  press  ESC-Q  to 
quit  the  editor  without  changing 
the  file. 

6,  After  the  disk  busy  light  goes  off, 
simultaneously  press  CTRL  and 
both  Amiga  keys  on  each  side  of  the 
space  bar  to  reboot  the  system.  This 
time,  and  from  now  on  whenever 
you  boot  with  this  disk,  AmigaDOS 
ends  up  in  memory  instead  of  the 
Workbench. 

The  Workbench  OpMon 

To  conserve  space  on  your  new 
AmigaDOS  disk,  you  may  want  to 
erase  some  files  used  by  the  Work- 
bench, such  as  the  LOADWB  com- 
mand in  the  C  subdirectory,  the 
Notepad,  the  clock,  and  all  .INFO 
files.  However,  it's  convenient  to 
have  the  Workbench  available 
when  you  need  it.  You  could  use 
the  editor  to  create  another  batch 
file  that  includes  LOADWB  and 
ENDCLI  >  NIL:.  You  would  then 
type  EXECUTE  WB  at  a  CLI  prompt 
to  bring  up  the  Workbench  (assum- 
ing you  named  the  batch  file  WB  by 
typing  ED  WB  to  create  the  batch 
file).  ED  is  useful  for  creating  all 
kinds  of  simple  batch  files,  in  fact. 
We'll  examine  the  editor  in  more 
detail  in  a  future  article  on  batch  file 
programming. 

Last  month's  article  presented 
a  tutorial  on  AmigaDOS  along  with 
a  reference  of  the  most  often-used 
commands.  Following  is  a  reference 
to  additional  commands  that,  al- 
though useful,  are  not  likely  to  be 
used  casually.  This  list  excludes 
commands  such  as  ECHO  that  are 
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really  useful  only  in  batch  files. 

When  experimenting  with 
AmigaDOS  commands,  it's  safest 
to  use  a  copy  of  your  DOS  disk  in 
case  you  accidentally  erase  a  file  or 
even  the  entire  disk. 

Advanced  AmigaDOS 
Commands 

<  and  >  (Input/output  redirection.) 
These  symbols  redirect  the  normal 
input/output  flow  of  a  command. 
For  example,  a  program  that  nor- 
mally accepts  input  from  the  key- 
board and  prints  its  output  on  the 
screen  could  be  coerced  into  accept- 
ing input  from  a  file  or  to  send  its 
output  to  the  printer.  The  <  and  > 
symbols  are  used  to  point  in  the 
direction  that  I/O  should  flow;  the 
less-than  sign  (<)  redirects  input, 
and  the  greater-than  sign  (>)  redi- 
rects output.  When  using  <  to  redi- 
rect input,  you  may  need  to  use  a 
question  mark  for  the  parameter 
that  the  redirection  file  is  replacing. 

Examples: 
DIR  >  DIRFILE 

This  redirection  of  the  DIR  com- 
mand sends  the  disk  directory  to 
the  file  DIRFILE  instead  of  to  the 
screen.  To  confirm  this,  you  can 
enter  TYPE  DIRFILE  to  display  the 
contents  of  DIRFILE. 
STACK  <  BASIC.STACK  ? 

The  stack  command  normally  ac- 
cepts a  command  line  parameter. 
Here,  a  file  (BASIC.STACK)  con- 
taining the  number  8000  can  be 
substituted.  In  order  for  the  file  to 
replace  the  command  line  parame- 
ter, you  must  use  a  question  mark 
to  hold  that  parameter's  position. 

FILENOTE  This  command  atta- 
ches a  comment  to  a  file.  Although 
AmigaDOS's  30-character  file- 
names let  you  be  quite  descriptive, 
an  optional  FILENOTE  lets  you  at- 
tach an  additional  80-character 
comment  to  a  file.  This  comment  is 
displayed  beneath  the  filename 
when  you  use  the  LIST  (not  DIR) 
command.  Follow  FILENOTE  with 
the  name  of  the  file  you're  describ- 
ing, then  the  comment.  You  must 
enclose  the  comment  in  quotes  if  it 
includes  spaces.  The  FILENOTE 
command  also  lets  you  include  two 
optional  keywords,  FILE  and 
COMMENT,  presumably  for  the 
sake  of  readability. 


Files  have  no  comment  by  de- 
fault. The  comment  is  retained  if 
the  file  is  changed  or  overwritten. 
However,  if  you  copy  a  file,  its  file- 
note  does  not  get  copied  with  it. 

Examples: 

FILENOTE  waver.bas  'Trogram  lels  you 
create  sound  waves." 

After  you  attach  this  comment  to 
the  file  waver.bas,  LIST  waver.bas 
yields  this  result: 

waver.bas  2272  rwed  ll-Ocl-85  10:09:53 
:  Program  lets  you  create  sound  waves 

Second  example; 

FILENOTE  FILE  waver.bas  COMMENT 

"Program  lets  you  create  sound 
waves." 

This  is  identical  to  the  first  example, 
except  for  the  optional  keywords 
FILE  and  COMMENT. 

INFO  This  command  shows  a  disk 
report.  INFO  displays  the  size  of 
each  mounted  drive  (normally 
880K,  except  for  the  RAM  disk),  the 
number  of  sectors  used,  number  of 
sectors  free,  percentage  of  capacity 
used,  number  of  disk  errors  that 
have  occurred,  the  read/write  sta- 
tus, and  the  disk's  name.  INFO  also 
separately  displays  the  names  of 
the  currently  inserted  disks.  INFO 
has  no  additional  parameters.  Use 
LIST  to  display  information  about  a 
particular  file  or  directory. 

INSTALL  This  command  makes  a 
disk  bootable.  In  other  words,  an 
INSTALLed  disk  can  be  inserted  at 
the  Workbench  prompt  to  bring  up 
the  system.  Just  follow  INSTALL 
with  the  optional  keyword  DRIVE 
and  the  drive  number.  If  you  want 
to  be  able  to  execute  AmigaDOS 
commands  after  booting,  you  must 
copy  the  C  subdirectory  from  your 
master  disk  onto  the  copy.  (All 
AmigaDOS  commands  are  extrinsic 
and  contained  in  the  C  sub- 
directory.) 

Example: 

INSTALL  DRIVE  DFl: 

This  makes  the  disk  currently 
mounted  in  the  external  drive 
bootable. 

JOIN  This  command  combines  two 
or  more  files.  Follow  JOIN  with  up 
to  ten  filenames  separated  by 
spaces.  The  destination  file,  hold- 
ing the  conglomerate,  is  specified 
with  the  keyword  AS,  The  original 
files  are  unchanged. 


Example: 

JOIN  Checks/Oct  Chccks/Nov  Checks/ 
Dec  AS  "Check8/4th  Quarter" 

This  combines  the  files  Oct,  Nov, 
and  Dec  from  the  subdirectory 
Checks  into  a  single  file  called  "4th 
Quarter"  to  be  created  in  the 
Checks  subdirectory.  The  destina- 
tion filename  is  enclosed  in  quotes 
because  it  contains  a  space 
character. 

PROMPT    Defines    a    new    CLI 

prompt.  Follow  PROMPT  with  a 
message,  enclosing  it  in  quotes  if 
the  message  contains  any  spaces. 
The  message  is  a  replacement  for 
the  normal  1>  or  2>  prompt  of 
AmigaDOS.  You  can  imbed  the 
characters  %N  to  display  the  cur- 
rent task  number. 

Examples: 

PROMPT "%N> " 

Displays  the  default  prompt. 

PROMPT  "Ready,  Master;" 

Displays  Ready,  Master:  as  the  new 
AmigaDOS  prompt. 

SEARCH  Finds  text  within  files. 
This  command  searches  for  the  tar- 
get string  through  any  directories 
you  specify.  Follow  SEARCH  with 
the  optional  keyword  FROM,  the 
pathname  of  the  directories  to  be 
searched,  the  optional  keyword 
SEARCH  followed  by  the  search 
string,  and  the  optional  keyword 
ALL,  which  forces  SEARCH  to  look 
through  all  subdirectories  con- 
tained in  the  specified  directory. 
When  SEARCH  finds  the  target 
string,  it  displays  the  line  contain- 
ing the  string  as  well  as  the  line 
number  of  the  line  containing  the 
string.  If  you're  searching  through  a 
directory,  SEARCH  also  displays 
the  filename  of  each  file  it's  search- 
ing through. 

SEARCH  is  not  case-sensitive; 
it  matches  regardless  of  upper-  or 
lowercase.  You  can  cancel  the  com- 
mand with  CTRL-C.  To  force 
SEARCH  to  abandon  the  current 
file  and  begin  searching  the  next, 
press  CTRL-D,  During  a  search, 
you  may  see  the  message  "Line  xx 
truncated,"  This  isn't  anything  to 
worry  about;  it  just  indicates  that 
the  line  was  too  long  to  be 
searched,  so  if  your  search  string 
was  contained  somewhere  near  the 
end  of  a  too-long  line,  the  search 
program  could  not  find  it. 
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Examples: 

SEARCH  FROM  DFO:  SEARCH  LoadWb 
ALL 

This  looks  for  the  phrase 
"LoadWb".  The  entire  contents  of 
the  internal  drive  are  searched,  in- 
cluding all  subdirectories,  so  this 
command  takes  a  long  time  to 
finish. 

SEARCH  Frogs/Tempfile  LIBRARY 
This  looks  for  the  word  LIBRARY  in 
the  file  "tempfile  within  the  subdir- 
ectory Progs. 

SORT  This  command  alphabetical- 
ly sorts  a  file  you  specify.  Each  re- 
cord in  the  file  to  be  sorted  must 
end  with  a  carriage  return.  Use 
SORT  followed  by  the  optional 
keyword  FROM,  the  file  to  be  sort- 
ed, the  optional  keyword  TO,  and 
the  name  of  the  file  where  the  sort- 
ed output  should  be  stored.  SORT 
collates  based  on  the  entire  line  un- 
less you  include  the  keyword  COL- 
START  and  a  column  number.  The 
sort  comparison  then  starts  by  com- 
paring two  lines  from  that  column 
to  the  end  of  the  line.  If  that  partial 
comparison  succeeds,  the  first  por- 
tion of  the  line  is  compared.  This 
lets  you  specify  two  levels  of  sort- 
ing (see  example). 

Unless  the  file  to  be  sorted  is 
less  than  about  200  lines,  increase 
the  stack  size  with  STACK  to  pre- 
vent a  crash  (see  below).  It's  better 
to  use  too  much  stack  space  than 
too  little. 

Example: 

If  you  have  a  list  of  first  and  last 
nam.es,  with  the  first  name  and  ini- 
tial in  columns  1-19,  and  the  last 
name  always  starting  in  column  20, 
you  could  use: 

SORT  FROM  Route  TO  Sorled.Route 
COLSTART  20 

The  files  are  sorted  by  last  name, 
and  each  group  of  identical  last 
names  is  subsorted  by  first  name. 

STACK  Sets  the  stack  size.  Follow 
STACK  with  the  new  stack  size  in 
bytes.  The  normal  stack  size  is 
4,000,  sufficient  for  most  com- 
mands. When  using  SORT,  Meta- 
ComCo  ABasiC,  programs  v«th  lots 
of  nested  subroutines,  or  programs 
using  flood-fill,  you  may  need  to 
increase  the  stack  size  to  prevent  a 
crash.  A  value  from  8,000  to  10,000 
is  usually  generous  enough  for 
these  cases. 


WAIT  This  makes  AmigaDOS 
pause  and  do  nothing  for  a  span  of 
time.  Although  this  might  seem  like 
a  dumb  command,  WAIT  has  cer- 
tain advantages  over  walking  away 
from  the  computer  or  simply  turn- 
ing the  machine  off.  Only  the  cur- 
rent CLI  is  frozen;  multitasked 
processes  continue.  WAIT  by  itself 
pauses  for  one  second;  you  can  fol- 
low WAIT  with  a  number  of  sec- 
onds, followed  by  either  SEC  or 
SECS,  and  a  number  of  minutes, 
followed  by  either  MIN  or  MINS. 
You  can  optionally  include  the  key- 
word UNTIL  followed  by  a  time  of 
day,  specified  as  HH:MM  (as  mea- 
sured by  the  Amiga's  internal  clock, 
so  make  sure  it's  set  correctly). 
WAIT  is  useful  within  batch  files  to 
allow  time  for  a  message  to  be  read, 
or  as  a  background  task  to  wait 
until  a  particular  time  before  exe- 
cuting another  command. 

Examples: 

WAIT  10  MINS  20  SECS 

Waits  for  10  minutes,  20  seconds. 
WAIT  UNTIL  17:00 

Waits  until  the  current  time  is  5 
p.m. 

RUN  WAIT  10  SECS  + 

DIR  + 

ECHO  "All  done." 

Waits  for  ten  seconds,  calls  a  direc- 
tory as  a  second  CLI  task,  then 
prints  the  message  "All  done." 

WHY  This  interesting  command 
calls  up  an  additional  explanadon 
of  what  caused  the  most  recent  er- 
ror. When  an  AmigaDOS  command 
fails,  you'll  usually  get  a  terse  error 
message.  If  you  want  a  more  de- 
tailed, technical  description,  ask 
WHY.  However,  many  times  WHY 
isn't  any  more  helpful — it  just  ex- 
plains in  more  detail  why  a  com- 
mand failed. 

Example: 

WAIT  10  SECONDS 

AmigaDOS  responds  with  the  error 
message  "Bad  Args"  because  the 
correct  notation  is  WAIT  10  SECS, 
not  WAIT  10  SECONDS.  If  you 
type  WHY,  you  get  this  answer: 

Last  command  failed  because  argument 
line  invalid  or  too  long. 

Although  more  descriptive,  it 
still  doesn't  explain  that  SECS 
should  be  SECONDS— but  it  does 
point  you  in  the  right  direction.  © 
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MessageMaker  64 


Create  attractive,  attention-grabbijig 
displays  for  the  Commodore  64  (or 
Commodore  128  in  64  mode)  by 
choosing  from  eight  different  sets  of 
oversize  letters.  The  program  even 
works  with  custom  character  sets  and 
lets  you  dump  the  screens  to  a  Com- 
modore printer.  It's  easy  to  use  and 
adds  impact  to  virtually  any  BASIC 
application. 


Have  you  ever  wished  that  your 
Commodore  64  could  display  big- 
ger screen  characters?  Though  ob- 
viously handy  for  children's 
educational  programs,  jumbo  char- 
acters are  useful  for  many  other 
purposes  as  Vk^ell.  Nearly  every  pro- 
gram starts  w?ith  a  title  of  some  sort: 
Large  letters  can  emphasize  it.  For 
anyone  vk^ho's  visually  impaired, 
oversize  characters  are  an  invalu- 
able aid  to  using  and  understanding 
computers.  And  if  you  have  some- 
thing to  sell  or  trade,  what  better 
way  to  gain  attention  than  by  print- 
ing your  message  in  giant  script? 

"MessageMaker  64"  answers 
all  of  these  needs  by  offering  a  set 
of  eight  different  oversize  character 
fonts,  ranging  from  characters  four 
times  the  normal  size  to  characters 
that  fill  the  entire  screen.  All  the 
fonts  can  be  used  at  any  time,  and 
the  entire  Commodore  character  set 
is  available  for  enlargement.  That  in- 
cludes all  of  the  normal  uppercase/ 
graphics  and  lowercase/uppercase 
characters — alphabetic  letters, 
numbers,  punctuation,  and  graph- 
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ics  symbols — in  reverse  video  as 
well  as  the  normal  form. 

Using  MessageMaker 

The  first  thing  to  do  is  type  in  and 
save  a  copy  of  MessageMaker  64, 
Before  you  run  the  program,  dis- 
able any  programming  aids  or  utili- 
ties that  use  the  function  keys 
(fl-f8).  Since  MessageMaker  uses 
the  function  keys,  this  would  only 
lead  to  conflicts. 

As  soon  as  you  run  Message- 
Maker,  it  blacks  out  the  screen  and 
waits  for  you  to  press  a  key. 
Though  you  don't  see  the  familiar 
blinking  cursor,  the  keyboard 
works  as  usual  in  most  other  re- 
spects. If  you  type  A-B-C,  it  prints 
ABC  on  the  screen.  To  print  the 
heart-shaped  graphics  character, 
press  SHIFT-S.  You  can  activate 
reverse  video  with  CTRL-9,  turn 
the  characters  red  by  pressing 
CTRL-2,  and  so  on.  To  select  a  new 
font,  press  one  of  the  eight  function 
keys  as  shown  in  the  accompanying 
table. 

The  eight  available  fonts  are 
described  in  terms  of  width  and 
height.  Thus,  4X4  characters  are 
four  times  wider  and  four  times 
higher  than  normal;  4X8  charac- 
ters are  four  times  wider  and  eight 
times  higher.  You  can  mix  different 
fonts  freely  on  the  same  screen.  For 
instance,  you  might  want  to  print  8 
X  16  characters  at  the  top  of  the 
screen,  and  4X4  characters  further 
down.  Of  course,  the  bigger  the 
font,  the  fewer  letters  you'll  be  able 
to  fit  on  the  screen  before  it  begins 


to  scroll.  Press  CTRL-L  to  switch  to 
lowercase/uppercase  mode,  or 
CTRL-U  to  switch  to  uppercase/ 
graphics  mode. 


MessageMaker  Function  Keys 


Font 

4X4 
4X8 
4  X  16 
4  X  24 
8X8 
8  X  16 
8  X  24 
32  X  24 


Key 

11 

il  (SHIFT-fl) 

f3 

f4  (SHIFT-f3) 

fS 

f6  <SHIFT-fS) 

f7 

f8  (SHIFT-m 


Note  that  the  cursor  keys  move 
one  norma!  character  space  at  a 
time  (not  the  width  of  an  oversize 
character).  If  you  accidentally  print 
the  wrong  character,  you  must 
press  CRSR-LEFT  to  back  up  to  the 
beginning  of  the  character,  then  re- 
place it  with  a  new  one.  You  can 
create  some  interesting  effects  by 
printing  a  character,  moving  the 
cursor  back  near  the  same  position, 
and  printing  the  same  character 
again. 

Signs  And  Banners 

MessageMaker  lets  you  dump  a 
screen  to  any  printer  that  can  han- 
dle Commodore  graphics  charac- 
ters (specifically,  the  reverse  video 
space  character).  This  lets  you  re- 
cord your  screens  for  posterity, 
make  signs  and  banners,  and  so  on. 
Press  CTRL-P  to  print  the  screen  in 
normal  width,  or  CTRL-X  to  print 
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in  double-width  characters.  Since 
double  width  prints  all  the  way  to 
the  margins,  you  may  prefer  this 
mode  for  signs.  However,  note  that 
the  symmetrical  fonts  (4X4  and  8 
X  8)  look  squashed  when  printed 
in  double  width;use  the  taller  fonts 
(4X8  and  8  X  16)  to  alleviate  this 
problem. 

The  program  works  as  pub- 
lished with  the  odd-numbered 
Commodore  printers — the  1525, 
801,  and  803.  To  use  the  program 
with  the  even-numbered  Commo- 
dore printers — the  1526  and  802 — 
add  the  following  new  line  5: 

5  OPEN  6,4,6:PRINT#6,CHR$(22): 
CLOSE  6 

You  also  need  to  change  the 
SI$  =  CHR$(15)  in  line  890  to 
SI$  =  ""  and  the  GR$  =  CHR$(8)  in 
line  900  to  GR$  =  ""  (in  both  cases, 
type  the  null  string — nothing  be- 
tween the  quotes). 

MessageMaker  also  works 
with  custom  character  sets.  Of 
course,  this  assumes  you  have  al- 
ready designed  the  characters  and 
stored  their  definitions  in  an  appro- 
priate memory  area.  Only  one 
change  is  needed:  Replace  the  val- 
ue 53248  in  line  30  with  the  memo- 
ry location  where  your  character 
definitions  start. 

Integrating  MessageMaker 
Screens 

The  simplest  way  to  add  a  Message- 
Maker  screen  to  an  existing  pro- 
gram is  with  "Commodore  64 
AutoPRINT,"  found  on  page  80  of 
the  July  1985  issue  of  COMPUTE!. 
Load  and  run  AutoPRINT,  then  an- 
swer the  question  about  line  incre- 
ments as  described  in  that  article. 
Do  not  type  SYS  51000  at  this  point. 
Instead,  load  and  run  Message- 
Maker,  then  create  the  screen  you 
want.  You  can  use  the  RETURN 
key  as  usual,  since  AutoPRINT  is 
not  yet  active.  However,  you  must 
leave  enough  blank  screen  space  to 
enter  a  few  direct-mode 
commands. 

When  your  title  screen  is  com- 
plete, press  RUN/STOP  to  break 
out  of  MessageMaker,  then  erase 
the  BREAK  IN  (line  number)  and 
READY  messages.  Now  load  the 
program  to  which  you  want  to  add 
the  screen,  and  erase  the  SEARCH- 
ING and  LOADING  messages.  At 
this  point  the  screen  should  contain 


nothing  but  the  screen  you  de- 
signed. Type  SYS  51000  and  press 
RETURN,  then  erase  that  message 
from  the  screen.  Now  press  RE- 
TURN anywhere  on  the  screen. 
AutoPRINT  adds  the  screen  to  your 
program  as  a  series  of  PRINT  state- 
ments. At  this  time  you  can  resave 
the  program,  renumber  it,  or  modi- 
fy it  in  any  other  way. 

MessageMaker  64 

For  instaicfions  on  entering  triese  listings, 
please  refer  to  "COMPUTEI's  Guide  to  Typing 
In  Programs"  in  ttiis  Issue  of  computei. 

10  GOSUB610  :rem  120 

20  PRINT"  (CLR)  (DOWNHbLU)";  .-PO 
KE532ai ,0:POKE53280,0 

srem  192 

30  SE(l)=53248:SE(2)=SE{i)+102 

4  :  SE ( 3 ) =SE ( 1 ) +2  048 : SE ( 4 )=SE 

(2)+2048  :rem  172 

40  S0=SE(1)  .•SR=SE(2)  :IS=SO 

: rem  7  3 
50  GETD$:IFDS=""THEN505rem  243 
60  AA=256:GOSUB130  : rem  16 
70  IFAA=2  56THEN50  : rem  230 
80  IFS(4)=1THENFORJJ=0TOS(1)ST 
EPS{2) :F0RII=1T0S(5) :G0SUD2 
70 :GOSUB320 :NEXTII , JJ 

.-rem  23  2 

90  IFS(4)=2THENFORJJ=0TO7:GOSU 

B270:FORII=1TOS(5) :GOSUB390 

;NEXTII,JJ  :rera  65 

100  GOSUB510  :rem  167 

110  IFPEEK(211 )>38THENGOSUB5a0 

: rem  3  2 

120  GOTO50  :rem  49 

130  REMARK-CHANGE  ASCII  TO  POK 

E  value! 14  SPACES) -OR-  PRI 

NT  SPECIAL  CHAR    : rem  136 

140  BB=ASC(D?) :IFBB>143THEN230 

: rem  205 

150  IFBB=16THEBGOSUB880  : RETUR 

K  ;rem  182 

160  IFBB=24THENGOSUB1070:RETUR 

bJ  :reni  222 

170  IFBB=21THENS0=SE(1) :SR=SE( 

2)  :IS=S0  :rem  95 

180  IFBB=12Ti!ENSO=SE(3)  ;SR=SE( 

4)  ;IS=S0  :ren)  100 

190  IFBB>132THENIFBB<141THENG0 

SUB850: RETURN      :rem  251 

200  IFBB=130RBB=141THENGOSUB55 

0: RETURN  :rera  161 

210  IFBB=18THENIS=SR: RETURN 

: rem  19 
220  IFBB=129THEKPRINT"il3"; :RE 
TURN  srem  86 

230  IFBB=146THEHIS=SO: RETURN 

: rem  68 
240  IFBB<32THENPRINTMID$( " 

[5  offHwht}{ii  OFF)! down) 

lOFFHHOMEJle  OFFJiREDj 

i  RIGHT } { GRN ) [ BLU 1 " , BB+1 , 1 ) 

;  : RETURN  .-rem  56 

250  IFBB>=144  AND  BB<160THENPR 
INTMID^C'fBLK)  {UP}  !0FF) 
[CLRl (0FF)g23E3iB43g5i§6  3 
E7ig8ilPUR) (LEFT) (YEL) 
lCYNj",BB-143,l);  ; RETURN 

:rem  212 

260  AA=(BBAND31)+0.5*(BBAND128 
) : IF ( BBAND64 ) =0THENAA=AA+3 


2: RETURN  : rem  240 

270  REMARK-FIND  CHAR  IN 

{27  SPACES }MEMORY  : rem  55 
280  POKE56334,0:POKE1,51 

J  rem  86 
290  KK=PEEK{IS+8*AA+JJ) :LL=PEE 

K(IS+S(3)+8*AA+JJ)  :rem  63 
300  P0KE1,55:P0KE56334,1 

! rem  84 
310    RETURN  :rem   116 

320    REMARK-PRINT    BINARY    REPRES 

ENTATI0K[13  SPACES ]FOSR  TI 

MES  AS  LARGE  : rem  196 
330  NN=64:FORMH=0TO3  : rem  215 
340  PP=l+8*INT(KK/tra)+2*IKT(LL 

/NN)  :rera  245 

350  KK=KK-INT(KK/NN)*NN:LL=LL- 

INT(LL/NN)*KN      : rem  202 

360  printhid$( " (off)  {off}Ed3 

{OPFlEF3{OFF}§l3[OPF)ECi 
{RVS)gK§{RVS}EB3[RVS)EV3 
{OFF3EvH0FF}gBii0FF]iK3 
{RVSlEC§{RVs)gli{RVS}§Fi 
{RVS3ED§{RVS)  ",PP,2); 

:  rem  4 
370  NN=INT(NN/4) :NEXT  MM 

:rem  193 

380  PRINT" (down) (4  LEFT j ";: RET 

URN  :rem  70 

390    REMARK- PRI NT    BINARY   REPRES 

ENTATI0N{13    SPACEs)eIGHT    T 

IMES    AS    LARGE  : rem    2 

400    SP$  =  RIGHTSC' {5    SPACES]", S( 

10)  )  :rem   0 

410    XX=KK  :reiti    24 

420  YY=256:F0RX1=1T08   : rem  21 

430  YY=YY/2  ;rem  153 

440  IFXX>=YYTHENXX=XX-YY: PRINT 

"{RVSI"SP$"{0FF3",-  :GOTO460 

:r-em  177 

450   PRINTSP$;  :rem   40 

460   NEXTXl  : rem   98 

470    IFS(9 )=0THENIFJJ=7THENIFS( 

10)=1THENGOTO490       : rem   112 

480   PRINT" {down!" ;  : rem    185 

490    FORT=lTOLEN(SP?) : PRINT" 

18    LEFT}"; :NEXTT       : rem    219 

500    RETURN  :rem    117 

510  REMARK-ADVANCE  TO  NEXT  PCS 

ITION  :rem  206 

520  IFS(6)>0THENFORT=1TOS(6) :P 

RINT"{UPJ "; :NEXTT  : rem  103 

530  IFS(7)>0THENFORT=1TOS(7) :P 

RINT " { RIGHT ) " ; :NEXTT 

:rem  246 
540  RETURN  : rem  121 

5  50  REMARK-PRINT  RETURN 

;rem  246 

560  IFS(8)>0THENFORT=1TOS{8)  :P 

RINT"{DOWN}":NEXTT:rera  180 

570  RETURN  srem  124 

580  REMARK-PRINT  TO  NEW  LINE 

:rem  206 

590  IFS(9)>0THENFORT=1TOS(9) :P 

RINT"  {D0WL^3":NEXTT  srem  185 

600  RETURN  :rem  118 

610  REMARK-DATA  FOR  4X4 : rem  71 

620  S(1)=6:S(2)=2:S(3)=1:S(4)= 

1:S(5)=0:  S(6)=4:S(7)=4:S( 

&)=2:S(9)=1:S{10)=1 

srem  160 

630  RETURN  srem  121 

640    REMARK-DATA   FOR   4X8 : rem   78 

650    SCl)=7sS{2)=l:S(3)=0:SC4)= 

1:S(5)=0:    S(6)=8:S(7)=4sSC 

8)=45S(9)=3:S(10)=1 

;rem  170 
6  60    RETURN  srem  124 
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6  70    REMARK-DATA    FOR    4X16 

:rem  128 
683  S(1)=7:S(2)=1:S(3)=0:S(4)= 
1  :S(5)=2:SC6)=16:S(7)=4rS( 
8)=4:S(9)=3:S(10>=1 

: rem  222 
690  RETURN  :rem  127 

700  REMARK-DATA  FOR  4X24 

:rem  121 
710  S(1)=6:S(2)=1:S{3)=0:S(4)= 
l!S(5)=3sS(6)=24:S(7)=4:S( 
8)=0:S(9)=0:S(10)=1 

sreni  208 

7  20  RETURN  : rem  121 
730  REMARK-DATA  FOR  8X8 : rem  82 
740  S(4)  =  2:S(5)  =  1.-  S(6)=8:S(7) 

=8:S(8)=4:S(9)=3:S(10)=1 

: rem  49 
750  RETURN  : rem  124 

760  REMARK-DATA  FOR  8X16 

:rem  132 
770  S(4)=2:SC5)=2:S(6)=16:S(7) 
=8:S(8)=8:S(9)=7:S(10)=1 

:rem   108 
780    RETURN  : rem    127 

790    REMARK-DATA   FOR    8X24 

:reni   134 
800    S(4)=2:S(5)=3:SC6)=24:S(7) 
=8:S(8)=0:S(9)=0:S(10)=1 

:rem   87 
810    RETURN  jrem    121 

820    REMARK-DATA   FOR   32X24 

: rem   173 
830    S(4>=2:S( 5)=3:S(6)=32!S(7) 
=0:S{8)=0:S(9)=0:S(10)=4 

:rem   84 
840    RETURN  :rem   124 

850    REMARK-CHANGE    FONTS 

:rem   188 

860    ONBB-132GOSUB610,670,730,7 

90,640,700,760,820    : rem   12 

870  RETURN  :  rem  127 

880  REMARK-PRINT  SCREEN  TO  PRI 

NTER  :rem  163 

890    SI5=CHR$U5)  :rem   86 

900  RV$=CHR?C18) :RO$=CHR?{146) 

:GR5=CHR?{8>  : rem   68 

910    VR=1024  :rem   70 

920    OPEN4,4;PRINT#4         : rem   127 

930    FORCL=0TO24:AS$=SI$:QF'J0:F 

ORRO=0TO39  :rem    243 

940    SC=PEEK(VR+40*CL+RO) 

:rem   162 
950    GOSUB1000  :rein   223 

960    AS$=AS?+CHR$(AS)  : rem   93 

970    NEXTRO  :rem  128 

980    PRINT#4,SI5+AS?+R05+GR$ 

: rem   44 

990    NEXTCL:PRINT#4,SI$!CL0SE4: 

RETURN  :rem    120 

1000    REMARK-CObFVERT    PEEK    TO    AS 

CII  :rem   2 

1010  IFSC>=12BTHENSC=SC-12a:AS 

?=AS$+RV5  :rem  59 

1020  IFSC<320RSC>95THENAS=SC+6 

4:GOTO1050         ;rem  208 

1030  IFSC>31ANDSC<64THENAS=SC: 

GOTO1050  srem  105 

1040  IFSC>63ANDSC<96THENAS=SC+ 

32  :rem  203 

1050    IFRIGHT5(AS$,1)  ORV5THENA 

S?=ASS  +  RO$  :rein   111 

1060    RETURN  srem    167 

1070    REMARK-EXTENDED    MODE 

: rem   45 
1080    SI$=CHR5(14) :GOTO   900 

:rem  137 


Commodore  64 
Program  Profiler 


D.E.  Walker 


Interested  in  speeding  up  your  Com- 
modore 64  BASIC  programs?  This 
convenient  utility  tells  you  which 
program  lines  take  the  most  time  to 
execute  so  you  can  rewrite  them  to 
run  faster.  The  utility  is  written  en- 
tirely in  machine  language,  but  you 
don't  need  to  understand  machine 
language  to  use  it. 


BASIC  2.0,  the  version  of  BASIC 
used  by  the  Commodore  64,  is 
what  purists  call  an  tinstructured 
programming  language.  While 
some  other  languages  (like  Pascal) 
force  you  to  write  every  program  in 
a  predefined  structure,  BASIC  gives 
you  the  freedom  to  create  whatever 
structure  you  like.  That  can  be  an 
advantage,  but  it  can  also  result  in 
slow,  inefficient  code  if  the  pro- 
gram spends  a  lot  of  time  perform- 
ing unnecessary  GOTOs  or 
GOSUBs  or  is  otherwise  poorly 
structured. 

If  you  want  to  improve  a  pro- 
gram's efficiency,  you  could  exam- 
ine it  line  by  line,  looking  for 
superfluous  REMs,  a  group  of  sin- 
gle-statement lines  that  could  be 
combined  into  one  multiple-state- 
ment line,  and  so  on.  But  that 
would  probably  produce  uneven 
results.  Many  parts  of  the  program 
are  performed  only  once,  or  so  in- 


frequently that  it  doesn't  matter 
whether  they're  efficient  or  not. 
What  you  want  to  look  for  are  the 
heavily  used  routines — FOR-NEXT 
loops,  subroutines  that  are  called 
frequently  with  GOSUB,  long  se- 
quences of  IF-THEN  tests,  and  so 
on — where  the  program  itself 
spends  the  most  time. 

"64  Program  Profiler"  gener- 
ates an  automatic  time  report  for 
any  64  BASIC  program,  making  it 
easy  to  identify  the  areas  where 
time  savings  may  be  possible. 
Though  it's  written  in  machine  lan- 
guage, you  can  use  it  without 
knowing  machine  language  at  all. 
First,  type  in  the  program  as  shown 
below,  then  save  it  on  disk  or  tape. 

A  Resident  Efficiency 
Expert 

When  you  run  the  BASIC  loader 
program,  it  puts  the  Profiler  ML 
code  in  memory  beginning  at  loca- 
tion 49152.  Now  you're  ready  to 
put  your  built-in  efficiency  expert 
to  work.  Enter  SYS  49152  and  press 
RETURN.  Profiler  asks  three  ques- 
tions. First,  you  can  choose  to  print 
the  profile  information  on  the 
screen  or  the  printer.  Second,  you 
can  decide  whether  to  output  the 
report  in  numeric  form  or  in  graphic 
form  as  a  simple  bar  chart.  Finally, 
enter  the  sampling  rate  you  want 
Profiler  to  use  in  evaluating  your 
program.    This   value    (a   number 
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from  1-9)  determines  how  fre- 
quently Profiler  looks  at  your  pro- 
gram as  it  runs.  The  lower  the 
sampling  rate,  the  more  frequently 
the  program  is  checked. 

At  this  point  you  can  load  and 
run  the  BASIC  program  you  want 
to  profile.  While  the  program  is 
running,  the  Profiler  keeps  track  of 
which  line  is  being  executed  ac- 
cording to  the  sampling  rate  you 
selected.  After  the  program  ends, 
there  will  be  a  short  delay.  Then  the 
Profiler  prints  out  its  report.  In  each 
case  you'll  see  a  series  of  line  num- 
bers, followed  by  numeric  values  (if 
you  chose  a  numeric  display)  or  a 
series  of  asterisks  (if  you  chose  the 
bar  chart). 

It's  important  to  understand 
exactly  what  the  report  means.  The 
Profiler  doesn't  merely  count  the 
number  of  times  that  a  particular 
line  executed.  Instead,  it  tells  you 
how  many  times  it  saw  the  line 
being  executed  at  the  designated 
sampling  rate.  Thus,  program  lines 
that  execute  very  quickly  may  not 
show  up  on  the  report  at  all.  That's 
fine:  If  a  program  line  executes  too 
fast  to  be  detected,  you  don't  need 
to  worry  that  it's  slowing  down 
your  program.  What  you're  con- 
cerned with  are  the  lines  that  show 
big  time  values — they  mark  the 
places  where  the  program  is  doing 
most  of  its  work. 

Adjustable  Sampling  Rate 

Depending  on  what  your  program 
does,  you  may  need  to  adjust  the 
sampling  rate  to  get  a  useful  report. 
The  largest  possible  time  value  is 
255,  If  nearly  every  line  in  the  re- 
port shows  a  value  of  255,  then  the 
sampling  rate  is  too  small  (Profiler 
is  looking  at  the  program  too  fre- 
quently). Reactivate  Profiler  with 
SYS  49152,  select  a  larger  sample 
rate,  and  rerun  the  program.  This 
time  Profiler  looks  at  the  program 
less  often,  which  results  in  smaller 
time  values  and  a  more  useful  basis 
for  comparison. 

On  the  other  hand,  if  every  line 
in  the  program  has  a  time  value 
under  ten,  and  many  important 
lines  are  missing  altogether,  the 
sampling  rate  is  too  large;  you'll  get 
a  more  meaningful  report  by  using 
a  smaller  rate.  Remember,  the  time 
values  are  meaningful  only  in  rela- 


tive terms.  The  most  meaningful 
report  is  one  that  shows  a  wide 
distribution  of  values,  rather  than  a 
cluster  of  extreme  values  at  one  end 
of  the  scale. 

Of  course,  common  sense 
comes  into  play  as  well.  If  you  have 
a  massive  database  program  that 
takes  six  days  to  run,  don't  expect 
Profiler  to  report  anything  smaller 
than  255  for  every  line,  even  at  the 
slowest  sampling  rate.  However, 
you  can  call  Profiler  from  within  a 
program,  just  as  you  can  from  direct 
mode.  Thus,  you  could  profile  an 
individual  subroutine  in  a  large 
program  by  inserting  SYS  49152  at 
the  beginning  of  the  subroutine, 
and  putting  a  STOP  or  END  state- 
ment just  before  the  subroutine  ter- 
minates with  RETURN.  If  you  then 
activate  the  subroutine  with  an  ap- 
propriate GOTO,  Profiler  treats  it 
like  a  separate  program. 


Commodore  64  Program 
Profiler 

For  instructions  on  entering  this  Ming,  please 
refer  to  "COMPUTEI's  Guide  to  Typing  In 
Programs"  in  tinis  issue  of  compute!. 

100  PRINT"  (CLRKCYNJPROFILER": 

PRINT" [3  DOWN  J  PLEASE  WAIT. 

. . "  t rem  174 

110  A=49152 :CS=0:FORI=ATOA+550 

: READB : POKEI , B : CS=CS+B :NEX 

T  s rem  36 

120  IFCS<>68166THENPRINT"ERROR 

IN  DATA  STATEMENTS. ": STOP 

: rem  46 

130  DATA  169,131,160,192,32,30 

,171,32,207,255  :reml57 
140  DATA  162,129,160,192,32,96 

,192,176,237,169  :rem237 
150  DATA  179,160,192,32,30,171 

,32,207,255,162  :rem  164 
160  DATA  130,160,192,32,96,192 

,176,218,169,209  jrem232 
170  DATA  160, 192, 32, 30,171,732 

207,255,201,13  : rem  99 
180  DATA  240,10,201,48,144,200 

,201,58,176,196  :reml58 
190  DATA  144,2,169,53,56,233,4 

8,10,141,126  :rem  18 
200  DATA  192,120,169,234,141,2 

0,3,169,192,141  :rem  157 
210  DATA  21,3,169,0,133,251,13 

3,253,169,195  ; rem  62 
220  DATA  133,252,133,254,88,96 

,134,251,132,252  :rem  218 
230  DATA  201,78,240,10,201,13, 

240,6,201,89       :rem  251 

240  DATA  240,6,56,96,169,0,240 

,2,169,1  :reni  75 

250  DATA  160,0,145,251,24,96,0 

,0,0,0  5 rem  203 

260  DATA  0,147,80,82,79,70,73, 

76,69,82  :rem  99 

270  DATA  32,32,32,32,32,32,32, 

13,13,79  :rem  58 

280  DATA  85,84,80,85,84,32,84, 


79,32,80  irera  104 

290  DATA  82,73,78,84,69,82,63, 

32,40,89  :rem  108 

300  DATA  44,78,47,67,82,41,58, 

32,0,13  irem  29 

310  DATA  79,85,84,80,85,84,32, 

72,73,83  :rem  103 

320  DATA  84,79,71,82,65,77,63, 

32,40,89  :rem  101 

330  DATA  44,78,47,67,82,41,58, 

32,0,13  :rem  32 

340  DATA  83,69,84,32,83,65,77, 

80,76,69  :rem  112 

350  DATA  32,82,65,84,69,32,40, 

49,45,57  :rem  94 

360  DATA  41,58,32,0,173,127,19 

2,208,78,173        : rem  27 
370  DATA  126, 192, 141, 127, ?192, 

65,157,208,106,169  :rem  75 
380  DATA  1,141,128,192,165,57, 

160,0,209,251       :rem  65 
390  DATA  208,7,200,165,58,209, 

251,240,28,165     : rem  125 
400  DATA  251,197,253,208,6,165 

,252,197,254,240   irem  228 
410  DATA  42,24,165,251,105,3,1 

33,251,165,252     : rem  104 
420  DATA  105,0,133,252,24,144, 

213,200,177,251    !reml44 
430  DATA  201,255,240,5,24,105, 

1,145,251,169       :rem  54 
440  DATA  3,133,251,169,195,133 

,252,206,127,192   : rem  221 
450  DATA  76,49,234,24,165,253, 

105,3,133,253       : rem  72 
460  DATA  165,254,105,0,133,254 

,160,0,165,57      jrem  62 
470  DATA  145,253,165,58,200,14 

5,253,200,169,1    : rem  167 
480  DATA  145,253,24,144,210,17 

3,128,192,240,213    : rem  6 
490  DATA  169,0,141,128,192,169 

,131,141 ,2,3        :rem  16 
500  DATA  169,193,141,3,3,169,1 

3,141,119,2        :rem  219 
510  DATA  169,1,133,198,24,144, 

178,120,169,49     : rem  133 
520  DATA  141,20,3,169,234,141, 

21,3,88,169        :rem  221 
530  DATA  131,141,2,3,169,164,1 

41,3,3,173         :rem  160 
540  DATA  129,192,208,103,160,0 

,177,251,170,200   :rem205 
550  DATA  177,251,32,205,189,17 

3,130,192,208,66   :rem  230 
560  DATA  169,32,32,210,255,56, 

32,240,255,160     : rem  115 
570  DATA  6,24,32,240,255,160,2 

,177,251,170       :rem  13 
580  DATA  169,0,32,205,189,169, 

13,32,210,255       : rem  73 
590  DATA  165,251,197,253,208,6 

,165,252,197,254   : rem  244 
600  DATA  240,16,24,165,251,105 

,3,133,251,165     : rem  103 
610  DATA  252,105,0,133,252,24, 

144,182,173,129    : rem  157 
620  DATA  192,208,43,76,131,164 

,169,32,32,210     : rem  117 
630  DATA  255,160,2,177,251,170 

,169,42,32,210     : rem  113 
640  DATA  255,202,203,250,24,14 

4,194,169,4,170    : rem  170 
650  DATA  160,255,32,186,255,32 

,192,255,162,4     : rem  126 
660  DATA  32,201,255,24,144,134 

,32,204,255,76     : rem  113 
670  DATA  131,164,0,0,255,255,0 

,0,255,255,0       :rem  255 
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Atari  Typo  Tool 


Correcting  typing  mistakes  is  much 
easier  with  this  multifunction  utility. 
It  lists  your  program  a  line  at  a  time, 
and  separately  displays  the  items  in 
critical  DATA  statements.  It  also  con- 
tains a  machine  language  subroutine 
that  quickly  deletes  any  range  of  lines 
from  a  BASIC  program.  For  all  400/ 
800,  XL,  and  XE  computers  with  at 
least  UK  RAM  (tape)  or  24K  RAM 
(disk). 


How  many  times  have  you  burned 
the  midnight  oil  searching  for  a 
typo  in  a  program  you've  typed  in? 
Although  COMPUTEl's  "Automatic 
Proofreader"  greatly  reduces  the 
chances  of  typos,  it  won't  catch 
transposition  errors,  and  it  can't  be 
used  with  listings  published  in  oth- 
er magazines  or  user  group  news- 
letters. Now  there's  help — "Atari 
Typo  Tool." 

This  program  individually  lists 
on  the  screen  the  lines  of  your 
freshly  typed-in  program,  ignoring 
DATA  statements  and  lines  that  be- 
gin with  REM.  Because  DATA  state- 
ments can  be  the  most  critical  parts 
of  a  BASIC  program — they  often 
contain  the  decimal  numbers  of 
machine  language  subroutines — 
Typo  Tool  displays  DATA  elements 
one  by  one  in  large-size  characters. 

At  any  time,  when  you  spot  a 
typo,  you  can  enter  edit  mode  to 
make  corrections,  then  continue 
where  you  left  off.  After  you've 
weeded  out  all  the  typos  in  a  pro- 
gram, you  can  tell  Typo  Tool  that 
you're  finished.  It  then  erases  itself 
from  memory,  leaving  only  your 
program  in  RAM. 


Patrick  Dell'Era 


Preparing  Typo  Tool 

To  get  started,  the  first  thing  to  do  is 
type  in  Typo  Tool  and  make  sure  it 
doesn't  contain  any  typos.  It  can't 
be  used  to  check  itself.  Use  the 
Automatic  Proofreader  and  be  extra 
careful  to  avoid  transposition  errors 
(such  as  DATA  196  instead  of 
DATA  169). 

Store  a  copy  of  Typo  Tool  on 
disk  or  tape  with  the  LIST  com- 
mand, not  SAVE  or  CSAVE.  That 
is,  LlST"D:filename.ext"  for  disk  or 
LIST"C:"  for  cassette.  It's  impor- 
tant to  use  the  LIST  format  because 
this  lets  you  merge  Typo  Tool  in 
memory  with  the  errant  program 
you'll  be  checking.  It's  also  vital  to 
save  a  copy  of  Typo  Tool  before 
running  it  for  the  first  time,  because 
it  erases  part  of  itself  when  you  type 
RUN. 

Now  you're  ready.  Type  in  or 
load  the  program  you  want  to  ex- 
amine for  typos.  Make  sure  this 
program  doesn't  use  line  number  0 
or  line  numbers  from  32100  up- 
ward— Typo  Tool  uses  these  line 
numbers,  and  it  will  replace  the 
lines  in  the  other  program  if  there's 
a  conflict.  Then  load  Typo  Tool, 
using  El^TER"D:filename.ext"  for 
disk  or  ENTER"C:"  for  cassette.  Fi- 
nally, type  RUN.  There's  a  short 
pause  as  Typo  Tool  loads  a  ma- 
chine language  subroutine  into 
memory.  Then  you'll  see  the  main 
menu  on  the  screen. 

The  menu  offers  three  choices: 
Line  Lister,  Data  Reader,  and  Fin- 
ished. You  need  to  type  only  the 
first  letter  of  your  choice.  When  you 
type  L  or  D,  you'll  be  asked  for  a 


starting  line  number.  If  you  want  to 
begin  checking  lines  or  data  from 
the  beginning  of  your  program,  just 
press  RETURN.  If,  however,  you 
want  to  start  at  another  point,  type 
in  the  appropriate  line  number  and 
press  RETURN. 

In  the  Line  Lister  mode.  Typo 
Tool  displays  a  single  line  of  the 
program  you're  checking.  Pressing 
the  cursor  up-arrow  (without 
CTRL)  lists  the  next  higher  line 
number.  Pressing  the  cursor  down- 
arrow  lists  the  next  lower  line  num- 
ber. Pressing  RETURN  brings  you 
back  to  the  main  menu.  And  press- 
ing E  enters  the  edit  mode. 

You'll  notice  that  at  the  bottom 
of  each  line  listed  on  the  screen  is 
the  command  CONT.  As  we'll 
show  in  a  moment,  this  lets  you 
leave  edit  mode  and  continue  with 
the  Line  Lister  mode. 

Making  Corrections 

When  you  press  E  to  enter  edit 
mode,  the  message  STOPPED  AT 
LINE  32180  appears.  Disregard 
this.  To  fix  a  typo  in  the  listed  line, 
cursor  up  to  the  line  as  usual  and 
make  your  corrections.  Press  RE- 
TURN on  the  line  to  enter  it  into 
memory.  Then  press  RETURN  on 
the  CONT  command  to  continue 
with  the  Line  Lister  mode.  Typo 
Tool  relists  the  corrected  line  on  the 
screen  so  you  can  verify  that  it  con- 
tains no  additional  errors. 

Since  typos  in  lines  beginning 
with  REM  do  not  affect  a  program's 
operation.  Typo  Tool  ignores  these 
lines.  However,  it  does  list  lines  in 
which  REM  follows  another  state- 
ment. 
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The  Line  Lister  mode  also  ig- 
nores DATA  lines.  Since  DATA 
numbers  are  especially  susceptible 
to  typos.  Typo  Tool  has  a  special 
mode  for  checking  these  important 
statements.  Enter  the  Data  Reader 
mode  from  the  main  menu  by 
pressing  D,  In  this  mode.  Typo  Tool 
displays  each  individual  DATA 
item  in  double-size  (GRAPHICS  2) 
characters  in  the  middle  of  the 
screen.  Just  below,  it  displays  the 
DATA  line  number  and  DATA  item 
number.  If  the  DATA  item  is  longer 
than  eight  characters,  the  item  is 
broken  into  pairs  and  displayed  one 
pair  at  a  time.  The  pair  number  of 
the  item  is  shown  below  the  DATA 
item  number. 

Typo  Tool  automatically  dis- 
plays each  DATA  item  in  sequence 
for  a  few  seconds  so  you  can  sit 
back  with  the  source  listing  and 
check  for  mistakes.  Each  time  Typo 
Tool  advances  to  the  next  DATA 
item,  it  sounds  a  buzzer.  If  you 
want  the  display  to  pause,  press 
any  key  except  RETURN  or  E.  The 
RETURN  key  exits  the  Data  Reader 
mode  and  returns  you  to  the  main 
menu.  The  E  key  enters  the  Data 
Reader's  edit  mode. 

This  mode  is  similar  to  the  Line 
Lister's  edit  mode.  The  DATA  line 
you  were  checking  is  listed  on  the 
screen  followed  by  a  CONT  com- 
mand. Below  that  is  the  line  num- 
ber, DATA  item  number,  and,  if 
appropriate,  the  DATA  pair  num- 
ber. You'll  also  see  the  message 
STOPPED  AT  LINE  32325,  which 
you  can  disregard.  To  fix  the  typo, 
cursor  up  to  the  DATA  line  and 
make  your  corrections  as  usual, 
then  press  RETURN  to  enter  the 
line  into  memory.  Press  RETURN 
over  the  CONT  command  to  leave 
edit  mode  and  continue  with  the 
Data  Reader  mode. 

When  Typo  Tool  has  listed  the 
last  line  of  your  program  or  read  the 
last  item  in  the  DATA  statements,  it 
displays  the  message  THAT'S  ALL 
THERE  IS!  and  returns  to  the  main 
menu.  If  you  have  no  further  check- 
ing to  do,  press  F  to  tell  Typo  Tool 
you're  finished.  Instantly,  Typo 
Tool  erases  itself  from  memory, 
leaving  your  corrected  program  be- 
hind. You  can  then  save  the  pro- 
gram and  try  running  it.  If 
everything  works  OK,  your  mission 
is   accomplished.   Otherwise,   you 


may  have  to  reENTER  Typo  Tool 
and  search  for  further  mistakes. 

Squeezing  Memory 

If  you  have  15K  RAM  and  a  cassette 
drive,  you'll  find  you  can  use  Typo 
Tool  with  programs  that  are  about 
tv\dce  as  long  as  itself  before  run- 
ning out  of  memory.  On  a  24K  com- 
puter with  a  disk  drive,  you'll  be 
able  to  work  on  programs  about 
five  times  as  long  as  Typo  Tool.  If 
you're  having  memory  problems, 
there  are  a  few  things  you  can  do  to 
squeeze  more  room  out  of  your 
available  RAM. 

Typo  Tool  includes  a  machine 
language  subroutine  that  deletes 
blocks  of  BASIC  lines  (that's  how  it 
erases  itself  when  you  type  F).  Typo 
Tool  also  uses  this  routine  to  delete 
the  block  of  DATA  statements 
within  it,  freeing  up  a  little  more 
RAM.  If  you  see  an  ERROR  2  (in- 
sufficient memory)  message  when 
you  try  to  use  Typo  Tool  with  your 
program,  follow  these  steps: 

1.  Type  NEW  to  clear  memory, 
LOAD  the  program  to  be  checked, 
and  LIST  it  to  disk  or  cassette. 

2.  ENTER  Typo  Tool  from  disk  or 
cassette  and  type  RUN,  After  the 
menu  appears,  press  BREAK,  If  you 
type  LIST  now,  you'll  see  that  all 
the  DATA  statements  are  gone,  as 
are  the  lines  that  POKEd  them  into 
memory. 

3.  ENTER  the  program  you  want  to 
check  from  disk  or  cassette.  Type 
RUN.  With  any  luck  at  all,  every- 
thing should  work. 

4.  If  you  still  get  an  ERROR  2  mes- 
sage, you'll  have  to  start  over  and 
LIST  your  program  in  two  or  more 
parts  to  disk  or  cassette.  To  do  this, 
type  LIST"D://;e?iflme.exf",FIRST- 
,LAST  or  LIST"C:",FIRST,LAST 
where  FIRST  is  the  first  line  num- 
ber of  the  block  to  be  saved  and 
LAST  is  the  last  line  number  of  the 
block.  For  each  part  of  your  pro- 
gram, type  NEW  and  repeat  steps  2 
and  3  above.  When  you've  correct- 
ed all  the  parts,  you  can  reunite 
them  by  ENTERing  each  block  of 
lines  into  RAM.  Then  save  the 
whole  program  onto  disk  or  tape. 

Bonus  Block  Deleter 

As  mentioned  above.  Typo  Tool  in- 
cludes a  machine  language  subrou- 
tine that  instantly  deletes  any  range 


of  BASIC  lines.  The  routine  is 
stored  in  memory  page  6,  begin- 
ning at  location  1536  decimal.  This 
memory  area  is  not  erased  when 
you  type  NEW,  although  it's  fre- 
quently used  by  other  programs  for 
storing  machine  language  routines, 
which  may  cause  a  conflict. 

To  use  the  block  deleter  on  any 
program  in  memory,  type  the  fol- 
lowing line  and  press  RETURN: 
A  =  USR(1536,FIRST,L  AST) 

where  FIRST  is  the  first  line  num- 
ber of  the  block  to  be  deleted,  and 
LAST  is  the  last  line  number  of  the 
block.  Be  sure  of  these  numbers 
before  you  press  RETURN. 


For  instructions  on  entering  these  listings, 
please  refer  to  "COMPJJTEI's  Guide  to  Typing 
In  Programs"  in  this  Issue  of  computei, 
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FP  0  QOT 
LD  32100 


no  32105 

DK  32110 

U  32115 

CF  32120 

ICD  32125 
JK  32130 
CP  32135 
GP  32140 

HH  32145 
PJ  32150 

BE  32155 
IL  32160 
LH  32165 

HI32170 

m 32175 

AE  321B0 

HJ  32185 

0!  321'?0 

KE  32195 

EO  32200 
m 32205 


0  32 
DIM 
23) 
)  sN 
=  82 
BLA 
0)  = 
ANK 
GRA 
,4 
4,N 
15 
POS 
LEG 
n 
Dat 
[a  F 

PDK 

!  IF 

IF 

IF 

GOT 

TIT 

■'  :  G 

GDS 

IF 

B  3 

:G0 

IF 

322 

IF 

THE 

?  " 

N  2 

"CO 

BET 

ND 

AN 
70 
IF 
322 
IF 
IF 
IF 
GOS 
220 
LIN 
K  (P 
PEE 
RN 
B  =  P 


100 

A«(106) ,T 
, T»  C4J  ,BLA 
7=0:NUL=1S 
:CURS=752 
NK*='"  ":BL 
" : BLANK* 
«:GOSUB  32 
PHICS  N7:0 
N7, "K: ":0P 
7, "E: ":POK 
POKE  CURS, 
ITIDN  3,10 
T: {5  SPACE 
Lister" : ? 
a  Reader " : 
inishecKDO 
E  MRG,2:GE 

A=76  THEN 
A=6a  THEN 
A=70  THEN 
0  32120 

L  E  «  =  "  CMJnMDi^QlI? 
OSUB     32400 
UB     32210 

LINE<A  THEN  BD3U 
2205:GOSUB  32200 
TO  32150 
LINE=32100  THEN 
40 

LINE=N7  OR  TYPE 
N  32195 

fCLEARJ ": POSITIO 
, 10: LIST  LINE: ? 
NT":SDSUB  32505 

#3,  B:  IF  S045  ft 
S061  AND  S0155 
D     S< >69     THEN     321 


ITLE*< 
NK« (20 
36:MRG 

ANK« (2 
(2>=BL 
380 

PEN  #3 
EN  «2, 
E  HRB, 
1 

:?  "SE 
S>[I  Li 
:?  "E 
?  ;  ?  " 
WNJ  " 
T  #3,  A 
32140 
32250 
32540 


S  =  61 
15:G 
S  =  69 
S  =  69 
S=15 
UB  3 
0:80 
E=PE 
RBM  + 
K  (PR 


THE 
OTO 
THE 
THE 
5  TH 
2205 
TD  3 
EK(P 
1  )  *2 
GM  +  4 


N  GOSUB 
32155 
N  STOP 
N  32165 
EN  32245 
:GDSUB  3 
2155 

R6M)+PEE 
56:TVPE= 
>  <2: RETU 


EEK(PR6M+2> : PRGM 
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"PRQM+B: RETURN 

165, 137, 133,204,32, 

FH  32477     ?     #6  ;  BLANK*  (  1  ,  3 )  ;  PC 

£J  32210 

PRGM=PEEK ( 13i) +PEEK 

136, 6, 165,203, 1 33 , 2 

SITION     12,8:?    #6;DI 

(137) «256:BaSUB    322 

05, 165,204, 133 

TEM:RETURN 

00:RETURN 

LG323S0 

DATA     206, 104, 141,18 

01  32478     RETURN 

ns  32215 

PRGM"PReH-B:6DSUB     3 

5,6,  104,24,  105,  1 ,  14 

OE  324B5     DATA     DATA 

2200 

1, 184,6, 144,3,238, 1 

{6     SPACES>«, lire, it 

FB  32220 

A"=LINE!  GQSUB     32210 

85,6, 32, 136, 6,56, 16 

em, pair 

PP  32225 

IF     LINe<fl     THEN     GDSU 

5, 144,229,203, 141, 1 

BN  32486     ?     DLINE:  RETURN 

B    32205:QDSUB    32200 

82,6, 165, 145 

NE  32487     ?     DITEM:  RETURN 

: BOTO    32225 

fj  32355 

DATA     229,204, 141, IB 

OJ  32488     RETURN 

PH  32230 

IF    TYPE    THEN    32215 

3,6, 56, 165, 203, 229, 

OE  32505     □  =  PEEK  (87)  :PDKE     CUR 

NP  32235 

RETURN 

205, 141, 186, 6, 165, 2 

S,  1:  IF        NOT     Q     THEN 

LJ  32240 

GRAPHICS    N7:P0KE    CU 

04,229,206, 141 , 187, 

POSITION    2,20 

RS, 1 : POSITION     10, 10 
:?     "THAT'S    ALL    THER 

6, 160,0, 174, 183,6,2 
40, 14, 177,203 

IE32510     ?     "<:5     SPACES!  CESO 

CTAB>  "  ,  "Irl^ilJrr     FOR 

E     IS ! " :FOR     1=1     TO    5 

m 32360 

DATA     145,205,200,20 

MENU" 

00:NeXT     I 

8,24  9,230,2  0  4,230,2 

HL  32515     IF        NOT     Q     THEN     ?     " 

PS  32245 

CLOSE     #2: CLOSE     »3:P 

06,202,208,24  2,204, 

tS    SPACES>{ESC> 

OKE     18a,N7:G0T0    321 

1B2, 6,240,7, 177,203 

CTABJ"  ,  "  CESOCUPJ     N 

10 

, 145,205,200,208,24 

EXT     HIGHEST     LINE":? 

LH  322  50 

TI  TLE*="f>J:k*:B:)rf:l>5d:: 

4,1 62 ,0,1 60 , 4 

"t5   spaces><:esc> 

"iQDSUB     32400:BDSUB 

IN  32365 

DATA     56, IBl, 138,237 

tTAB>",  "  CESO  CDOWNJ 

32435:BDSUB    32505 

,  186,6, 149, 138, IBl, 

NEXT    LOWEST    LINE" 

HH  32255 

RESTORE    A; TRAP    3233 

139, 237, 1B7,6, 149, 1 

60  32520     IF    G    THEN    7     " 

5 

39, 232,232, 136,208, 

{5    SPACESJ tESCJ 

DJ  322i!>0 

POKE    764,2S5:READ    A 

236,96, 160,2, 177,20 

tTABJtS     SPACESJANY 

»! D I  TEH-PEEK  (182)  :D 

3,141. 188,6, 136 

KEY     TO     PAUSE/RESTAR 

LINE-PEEK ( 183) +PEEK 

IB  32370 

DATA     177,203,136,20 

T" 

(104)  «25<b:  IF     DLINE> 

1 , 128,240, 30,205, 18 

0832525     ?     "<2    UPJPRESS 

32099    THEN    32240 

5, 6, 240, 4, 176,23, 14 

t2    DOWN} CESCJ CTABJ 

ni  32265 

TYPE-LEN (ft*) ; IF    TYP 
E>B    THEN     32275 

4,7, 177, 203,205, 184 
, 6, 176, 14,24, 173, IB 

{3     SPACES>[=    TO     EDIT 

> 

OH  32270 

GOSUB    32440: PQSITIO 

e, 6, 101, 203 

DI  32530     IF       NOT     D    THEN    POSI 

N     INT(8-(LEN(A«) /2) 

CH  32375 

DATA     133,203,144,21 

TION    5, 14 

+0.5), 3:F0R     I=N7     TO 

5, 230, 204, 208,211,9 

W 32535    POKE    CURS , N7: RETURN 

20iPOKE     53279, N7:N 

6,0,0,0,0,0,0,0 

NN  32540     TITLe»="li*<:K.1!M.!"  :  R 

EXT     li?    #6;A»:GGBUB 

n 32380 

IF     PEEK<NUL)=216     TH 

OSUB     32400:ORAPHICS 

32295:Q0T0    32260 

EN    32390 

N7JCLR     tX=USR(1536 

LJ  32Z75 

IF     TYPE/2<>INT<TYPE 

H  32385 

RESTORE     32345:F0R     1 

,N7,N7) :X=USR(1536, 

/2)      THEN     A»(TYPE+1) 

=NUL     TO     1724:READ     A 

32100,32540)                     @ 

-BLANK* (1,1) 

:PaKE     I.AiNEXT     I 

BL  322B0 

GOSUB    32440:FDR    A=l 
TO    LEN(A»)     STEP    2: 

BD  32390 

A=1JSR{NUL     32345     323 

■    ■             ^rf    <Hrf    IV     1     1  V  kj    L.fc    ■-     ^^  ^b  ^J  ^1    %J    ■      ^J  sj-  W*               ~ 

90) 

POSITION     7,3:F0R     1= 
N7     TO    20: POKE    53279 

DE  323  95 

RETURN 

POKE    CURS,N7:?    TITL 

SL  32400 

,N7:NEXT     I:?    #6;ft*( 

E»; :FOR     I=N7    TO     100 

Attention  Programmers 

A, A+1 ) 

:NEXT     I:? 

IN  32285 

POSITION     12,9:?    *b; 

BS  32405 

IF     TITLE*  (8)  =  "G:"     TH 

COMPUTE!  magazine  is  currently 

lNT(A/2+0.4)+l:QOSU 
B    32295:NEXT    ft:POSI 
TION     1,9:?    #6;BLANK 

HC  324  10 

EN     RETURN 

r^          II     r  1   1  p^  ^    p%                                   ------      -Ml 

looking  for  quality  articles  on 
Commociore,  Atari,  Apple, 

?          tUPJPress     l;rak<li;I.' 
t{DOWN}ttOR*t{UP> 

*jPOSITION     12,9:?     # 

t6    LEFT>o    start     at 

and  IBM  computers  (incluciing 

6;BLANK*(l,3) 

-first    line" 

the  Commodore  Amiga  and 

D6  32290 
CI  32295 

GOTO    32260 

FOR     I=N7    TO     200: DN 

PEEK (764) < >255     BOTO 

NJ  324  1  5 

?     :?     "Enter    specifi 
c     line    nurabBr     to    st 
art.":?     : ?     "  =  >  >     " ; 

Atari  ST),  If  you  tiave  an 
Interesting  home  application. 

32305:NEXT     I 

JC  32420 

TRAP    32425: INPUT    *2 

educational  program. 

AE  32300 

POSITION    N7,3;?    #6; 

,A:TRAP    40000:GOTO 
32430 

programming  utility,  or  game. 

NS  32305 

BLANKS; RETURN 

POP     : GET     #3,B:IF    B< 

HD  32425 

A  =  N7 

submit  it  to  COMPUTE!,  P.O. 

>155    AND    B069    THEN 

H«  32430 

RETURN 

Box  5406,  Greensboro,  NC 

SET    #3,B:  IF    B069 
THEN     32300 

DI  32435 

GRAPHICS    2:POKE    712 
,14e:P0KE    70a,154:R 
ETURN 

27403.  Or  write  for  a  copy  of 
our  "Writer's  Guidelines." 

DD  32310 

IF    B=155     THEN    POP     : 

GOTO     32245 

GRAPHICS     0:POSITION 

LF  32440 

a=PEEK (87) : B=2 : B=B+ 

EN  32315 

(TYPE>8) :FaR     X=l     TO 

2 , 7 : L 1ST     DLINE: ?     " 

B:RESTQRe     32485:RE 

EN  32320 

CDNT":60SUB    32440 
IF     TYPE>a     THEN     PDSI 

AD    TITLE«:POKE     182, 

X:READ     T*:TITLE*(6, 

10) =T* 

POSITION     1+(Q=0),6+ 

X+ ( (Q=0) «7) 

IF     Q    THEN    ?    #6;TITL 

EF  32325 
ftS 32330 

TION     13,16:?     INT(A/ 
2+0. 4) +1 

STOP 

GOSUB     3243S:eOSUB     3 

LB  32445 
116  32450 

COMPUTE! 

TOLL  FREE 

2505:eaSUB     32440:RE 
TURN 

CD  32455 

IF       NOT    Q    THEN    ?     TI 

Subscription 

O  3233S 

IF     PEEK<195)=6     THEN 

TLE«; 

Order  Line 

32240 
GRAPHICS     N7:?     "ERRO 

00  32460 

GOSUB     32475+X+ ( (0=0 

KH  32340 

)tl0):NEXT     X 

1-800-247-5470 

R-        "; PEEK < 195) : END 

FB  32465 

RESTORE    DLINE:POKE 
182, DITEMiRETURN 

In  lA  1-800-532-1272 

UN  32345 

DATA     216, 104, 104, 14 
1, 185, 6, 104, 141, 184 

EC  32476 

?     «6;BLANK«(1,3) : PO 
SITION     12,7:?    #6;DL 

, 6, 165, 136, 133,203, 

INE: RETURN 

76     COMPUTEI     Febajarv  1986 


ST  Doodler 


D.W.  Neuendorf 


This  short,  simple  drawing  program 
for  the  Atari  ST  demonstrates  how  to 
write  a  Logo  program  that  takes  ad- 
vantage of  GEM's  built-in  features 
and  user  interface.  It  works  on  any 
Atari  ST  with  Logo. 


When  Atari  first  started  shipping 
the  520ST  last  summer,  ST  BASIC 
wasn't  quite  ready,  so  the  only  pro- 
gramming language  supplied  was 
Digital  Research's  Logo.  While  bor- 
rowing a  friend's  520ST,  I  decided 
to  put  Logo  to  work  in  a  drawing 
program.  This  version  of  Logo, 
however,  was  translated  from  Digi- 
tal's Logo  for  the  IBM  PC  and 
doesn't  run  particularly  fast  on  the 
Atari  ST.  After  some  experiment- 
ing, I  realized  it  was  too  slow  to 
support  a  full-fledged  drawing 
utility. 

Not  yet  ready  to  write  off  the 
ST/Logo  combination,  I  considered 
alternatives.  Calls  to  the  operating 
system  were  out,  since  there  was 
only  a  limited  memory  map  and  no 
CALL  statement.  Furthermore, 
Logo  restricts  the  areas  of  memory 
accessible  to  the  EXAMINE  and 
DEPOSIT  commands  (similar  to 
BASIC'S  PEEK  and  POKE).  Even 
hand-assembled  machine  language 
routines  are  useless  without  a  way 
to  call  them. 

Then  I  remembered  GEM — 
Digital  Research's  Graphics  Envi- 
ronment Manager,  which  sits  as  a 
shell  on  TOS,  the  Si's  operating 
system.  In  Logo,  GEM  has  a  Set- 
tings menu  that  lets  you  change 
line-drawing  colors,  line-drawing 
widths,  fill  colors  and  patterns,  and 
other  parameters.  There  must  have 
been  some  reason  why  Atari  in- 
cluded all  these  settings  in  a  drop- 
down menu,  duplicating  many  of 


the  Logo  commands.  One  very 
good  reason,  1  concluded,  was  to 
avoid  forcing  someone  like  me  to 
code  a  complex  user  interface  in 
Logo,  which  would  bog  down  the 
program.  After  all,  the  Settings 
menu  is  quite  similar  to  the  menu  I 
planned  to  include  in  my  drawing 
program. 

Therefore,  I  took  a  hard  look  at 
what's  really  needed  to  draw  pic- 
tures on  the  ST.  Letting  GEM  han- 
dle the  fancy  features  via  its 
Settings  menu,  all  we  need  is  an 
easy  way  to  fill  areas  and  draw 
lines,  circles,  and  boxes.  Providing 
these  functions  are  well  within  the 
capabilities  of  Logo.  "ST  Doodler" 
is  the  result. 

Drawing  With  Doodler 

To  use  ST  Doodler,  run  Logo  and 
type  in  the  listing  below.  Be  sure  to 
save  at  least  one  copy  before  you 
try  to  use  Doodler  for  the  first  time. 
Next,  you  should  decide  which 
screen  resolution  mode  you  wish  to 
use.  The  monochrome  screen  gives 
you  the  highest  resolution — and 
thus  the  capability  to  draw  finely 
detailed  pictures — but  allows  only 
black  and  white.  The  low-resolution 
mode  allows  16  different  colors,  but 
with  the  loss  of  some  detail.  The 
medium-resolution  mode  offers 
more  detail  than  low  resolution, 
with  up  to  four  colors.  If  you  wish 
to  draw  in  a  mode  other  than  the 
one  currently  selected,  you  must 
quit  Logo  and  return  to  the  GEM 
desktop,  then  select  Set  Preferences 
from  the  Options  menu.  After  mak- 
ing your  selection,  run  Logo  again. 
To  begin  drawing  with  Doo- 
dler, clear  the  Graphics  window  by 
typing  CS  and  pressing  RETURN  at 
a  Logo  top-level  ?  prompt,  then 
type   SKETCH.   You'll  probably 
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This  picture  was  created  by  the  author 
using  "ST  Doodler." 

want  to  expand  the  Logo  Graphics 
window  to  full-screen  size  to  give 
yourself  more  room  to  work.  Doo- 
dler's  pen  color  can  be  altered  at 
any  time,  along  with  the  back- 
ground color,  line  width,  fill  color, 
and  fill  pattern  settings,  by  drop- 
ping down  the  Settings  menu  and 
selecting  the  Graphics  opdon.  Click 
the  pointer  on  the  setting  you  want 
to  change,  then  type  in  the  appro- 
priate number  and  click  on  the  OK 
box. 

To  draw  with  Doodler,  you 
connect  a  series  of  lines  end  to  end. 
Choose  the  beginning  of  a  series  of 
line  segments  by  moving  the  mouse 
pointer  to  the  first  desired  endpoint 
and  pressing  the  left  button,  (For  all 
button  presses  in  ST  Doodler,  hold 
down  the  button  for  at  least  a  sec- 
ond or  two;  Logo  cannot  detect  a 
faster  press.  If  a  Doodler  command 
doesn't  respond,  you're  probably 
not  holding  down  the  button  long 
enough.) 

You  can  specify  subsequent 
endpoints  the  same  way.  You  can 
draw  a  continuous  line  by  holding 
down  the  left  button  while  moving 
the  mouse.  However,  because  Logo 
isn't  too  adept  at  reading  the  but- 
tons, you  must  move  the  mouse 
very  slowly  to  draw  smooth  lines. 
To  end  the  series  of  connected  line 
segments,  move  the  pointer  outside 
the  drawing  area  and  press  the  left 
button.  If  you're  using  a  full-size 
Graphics  window,  the  best  place 
outside  the  draudng  area  is  the 
upper-right  comer  of  the  screen  be- 
yond the  menu  bar. 

To  fill  an  area  with  color,  place 
the  mouse  pointer  inside  the  area 
and  press  the  right  button.  Be  sure 
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the  area  you're  trying  to  fill  is  com- 
pletely enclosed  by  lines.  If  there 
are  any  holes,  the  fill  "spills  out" 
and  colors  the  entire  background. 

To  draw  circles  or  boxes,  press 
the  right  button  while  the  pointer  is 
outside  the  drawing  area.  A  prompt 
asks  you  to  press  the  C  or  B  keys  for 
a  circle  or  box,  respectively.  Press- 
ing any  other  key  exits  the  circle/ 
box  mode.  -  After  pressing  C  to 
choose  a  circle,  point  to  the  desired 
center  and  press  the  left  button; 
then  move  the  pointer  to  the  de- 
sired radius  and  press  the  button 
again.  If  you  pressed  B  to  choose  a 
box,  point  first  to  its  lower-left  cor- 
ner and  press  the  left  button;  then 
point  to  its  upper-right  comer  and 
press  the  button  again. 

You  can  erase  portions  of  your 
drawing  by  dropping  down  the  Set- 
tings menu,  selecting  the  Graphics 
option,  changing  the  line  color  to 
match  the  background  color,  then 
drawing  over  the  parts  you  want  to 
erase.  You  may  also  want  to  widen 
the  line  setting  for  this  purpose. 

How  It  Works 

The  top-level  procedure,  SKETCH, 
does  a  little  initializing  before  in- 
voking the  main  procedure,  PT, 
which  executes  repeatedly.  PT 
stores  the  current  mouse  status  in 
the  variable  T,  then  analyzes  it  for 
the  state  of  the  left  and  right  mouse 
buttons.  Each  mouse  button  has 
two  functions,  depending  on 
whether  the  pointer  is  inside  or  out- 
side the  drawing  area  when  the 
button  is  pressed. 

Pressing  the  left  button  (indi- 
cated in  ITEM  3  of  MOUSE)  speci- 
fies the  endpoints  in  a  series  of 
connected  line  segments.  DRAW? 
sets  a  flag,  depending  on  whether 
ITEM  5  of  MOUSE  is  TRUE  (point- 
er inside  the  drawing  area)  or 
FALSE  (pointer  outside  the  draw- 
ing area).  This  flag,  in  turn,  controls 
whether  DR  draws  another  line 
segment  or  sets  a  new  starting 
point. 

Pressing  the  right  button  (indi- 
cated in  ITEM  4  of  MOUSE)  fills  an 
area  with  the  current  fill  pattern  if 
the  pointer  is  within  the  Graphics 
window  boundaries  (ITEM  5  of 
MOUSE  is  TRUE),  or  initiates  circle 
or  box  drawing  if  the  pointer  is 
outside  the  Graphics  window 
(ITEM  5  of  MOUSE  is  FALSE).  The 


circle  and  box  prompts  are  drawn  in 
the  pen-reversed  mode,  then  selec- 
tively erased  by  redrawing  them  in 
the  same  place.  Although  it  can  be 
hard  to  read  these  prompts  over 
existing  screen  graphics,  the  alter- 
native— printing  to  the  Dialog  win- 
dow— stops  the  program. 

You  can  save  your  artwork 
using  the  Save  Pic  option  in  the  File 
menu,  and  reload  previous  draw- 
ings with  the  Load  Pic  option  in 
that  menu.  When  reloading  pic- 
tures, you  must  set  the  screen  for 
the  same  resolution  that  was  in  ef- 
fect when  the  picture  was  saved. 
For  example,  you  cannot  load  a  pic- 
ture drawn  on  the  low-resolution 
screen  into  a  medium-resolution 
Graphics  window. 

The  lesson  for  programmers 
here  is  that  programming  on  the  ST 
will  be  very  different  than  pro- 
gramming on  earlier  computers 
with  traditional  operating  systems. 
Whether  you're  using  Logo  or  a 
very  fast  compiled  language,  it 
would  be  a  mistake  to  ignore  the 
high-level  tools  available  in  GEM 
and  TOS,  Not  only  is  it  a  waste  of 
effort  to  write  everything  from 
scratch,  but  it's  also  wise  to  stick  to 
the  user  interface  which  is  already 
thoroughly  familiar  to  every  ST 
owner. 

ST  Doodler  in  Logo 

TO  SKETCH 

HIDETURTLE 

PENUP 

MAKE  "GFILL  "TRUE 

MAKE  'TF  0 

PT 
END 

TO  PT 
MAKE  'T  MOUSE 

IF  (ITEM  3  :T)  [DRAW?] 
IF  (ITEM  4  :T)  [BCORF] 
PT 

END 

TO  DRAW? 
IF  (ITEM  5  :T)  [DR]  [MAKE  "TF  0] 

END 

TODR 
IF  (:TF  =  0) 
[PENUF  SETPOS  :T  MAKE  TF  1] 
[PENDOWN  SETPOS  ;T  PENUP] 

END 

TO  BCORF 
IF  (ITEM  5  :T) 

SETPOS  PIECE  1  2  :T  FILL] 

[BORC] 
END 


TO  BORC 

MAKE  'TOOL  ITEM  5  TURTLEFACTS 

BCMSG 

MAKE  "CH  READCHAR 

BCMSG 

SETPC  :PCOL 

IF  (;CH  =  "B)  [BX] 

IF  (:CH  =  "Q  [CIRC] 

MAKE  "TF  0 
END 

TO  BCMSG 

SETPOS  [-70  80] 

SETHEADING  0 

TMSG  [Circle:  Press  C] 

TMSG  [Box;  Press  B] 

TMSG  [Abort:  Press  any] 

TMSG  [#    #    #    #  other  key] 
END 

TO  TMSG  :MESSAGE 

PENRE  VERSE 

TURTLETEXT  ;MESSAGE 

PENUP 

BACK  18 
END 

TOBX 

MAKE  "GFILL  'TALSE 
BOX  MBP 

MAKE  "GFILL  'TRUE 
END 

TO  CIRC 

MAKE  "GFILL  "FALSE 
CIRCLE  MCP 
MAKE  "GFILL  "TRUE 
END 

TO  MBP 

GETPOINTS 

MAKE  'TAR3  ABS  ((FIRST  :PAR2)  - 

(FIRST  :PAR1)) 
MAKE  'TAR4  ABS  ((LAST  :PAR2)  - 

(LAST  rPARD) 
OUTPUT  (SENTENCE  :PAR1  :PAR3 

;PAR4) 
END 

TO  MCP 
GETPOINTS 
MAKE  "PAR3  (ABS  ((FIRST  :PAR2)  - 

(FIRST  :PAR1)»  "  2 
MAKE  'TAR4  (ABS  ((LAST  :PAR2)  - 

(LAST  :PAR1)))  '  2 
OUTPUT  SENTENCE  :PAR1  SQRT 
(:FAR3  -f  :FAR4) 
END 

TO  GETPOINTS 

MAKE  "PARI  GETPOS 

DELAY 

MAKE  'TAR2  GETPOS 

END 

TO  GETPOS 

MAKE  "T  MOUSE 

IF  (ITEM  3  :T)  [OUTPUT  PIECE  1  2  :T] 

GETPOS 
END 

TO  DELAY 

REPEAT  10  [MAKE  '7UNK  SIN  5] 
END 
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Instant  Apple  Help  Screens 


With  this  short  utilit}/  you  can  design 
and  save  your  own  custom  help 
screens  to  disk,  then  quickly  call  them 
into  BASIC  programs.  For  all  Apple 
U-series  computers  with  DOS  3.3  or 
ProDOS. 


As  professional  software  designers 
have  discovered,  help  screens  are 
very  popular  features  in  all  kinds  of 
programs.  Users  don't  have  to  fum- 
ble around  with  "handy"  reference 
cards — they  can  just  hit  ESC  or 
some  other  key  and  call  up  a 
screenful  of  instructions. 

"Help  Screen  Editor,"  listed 
below,  is  a  utility  program  that  lets 
you  create  help  screens  of  your  own 
which  are  then  saved  to  disk  as 
binary  files.  Once  saved,  the  file  can 
be  summoned  back  to  the  screen 
with  a  simple  BLOAD  command.  If 
you  BLOAD  the  file  to  an  area  of 
memory  known  as  text  page  2  with 
this  statement: 
BLOAD  filename,AiS0O 

your  help  screen  can  be  viewed  and 
swapped  with  text  page  1  (the  nor- 
mal screen)  with  this  statement: 
POKE  -16299,0 

The  following  statement  will  switch 
back  to  the  normal  screen  display 
(text  page  1); 
POKE  -16300,0 

By  placing  these  lines  in  a  loop, 
the  screens  can  be  swapped  some 
30  times  per  second.  Pretty  impres- 
sive for  BASIC. 

For  even  greater  convenience, 
you  can  use  the  following  state- 
ment, which  displays  your  help 
screen  until  a  key  is  pressed,  then 
switches  back  to  the  normal  screen: 
POKE  -16299,0:  GET  G$:POKE  -16300,0 

Other  uses  for  BLOADed 
screens  include  interactive  software 
demonstrations  and  adventure 
games  that  show  a  screen  and  offer 
several  options,  each  leading  to  an- 


Kent  Brewster 


other  screen. 

Designing  A  Help  Screen 

Any  BASIC  program  that  uses  text 
page  2  must  reserve  space  for  that 
memory  with  POKE  104,12  and 
POKE  3072,0.  This  is  the  purpose 
of  Program  1,  which  changes  the 
bottom  of  program  memory  and 
calls  Program  2,  Help  Screen  Edi- 
tor. (Don't  confuse  this  process 
with  changing  the  value  of  LO- 
MEM,  which  merely  relocates  the 
bottom  of  variable  memory,  not 
program  memory.)  If  you  want,  you 
can  save  Program  1  on  a  new  disk 
with  the  filename  HELLO  so  it 
automatically  boots  the  editor 
when  the  computer  is  turned  on. 

Type  in  and  save  Program  2 
(use  the  filename  SE  if  you  want  the 
program  to  work  properly  with 
Program  1).  It's  quite  short  for  a 
full-featured  editor. 

The  first  time  you  run  Help 
Screen  Editor,  obviously  there  will 
be  no  help  screen  on  the  disk  for  it 
to  load.  Your  first  project  should  be 
to  create  a  help  screen  for  the  screen 
editor  itself,  so  temporarily  modify 
the  program  to  skip  loading  a  help 
screen  by  inserting  this  line: 
15  GOTO  40 

The  help  screen  you  make  for 
Help  Screen  Editor  should  look 
something  like  the  example  in  the 
accompanying  screen  photo.  Here 
are  the  screen  editor  commands: 


CTRL-I 

cursor  up 

CTRL-J 

cursor  left  (or  use  the  left 

CTRL-K 
CTRL-M 

cursor  key) 

cursor  ri^t  (or  use  the  right 

cursor  key) 

cursor  down 

CTRL-N 

normal  text 

CTRL-R 

reversed  text 

CTRL-F 
CTRL-S 

flashing  text 
save  screen 

CTRL-L 

load  screen 

CTRL-C 

clear  screen 

CTRL-P 
CTRL-T 
CTRL-Q 

print  screen 
change  title 
quit  editor 

ESC  =  view  help  screen 

Once  you've  created  a  help 
screen,  save  it  to  disk  by  pressing 
CTRL-S  and  specifying  a  filename. 
For  the  screen  editor's  help  screen, 
use  the  filename  SEHELP.  (The 
program  automatically  appends  the 
filename  extender  .SCR  when  sav- 
ing or  loading  screen  files.)  Then 
delete  the  temporary  line  15  we 
added  above,  and  you're  ready  to 
go.  From  now  on,  you  can  call  up 
this  help  screen  of  screen  editor 
commands  merely  by  pressing 
ESC.  Press  any  key  to  switch  from 
the  help  screen  back  to  the  editor. 


ttt  KELP  SCREEN  EDITOS  *** 


CTRL  - 

V 

■ 

CURSOR   CONTROLS 

CTR  .    - 

el: 

a 

* 

aulr'^Tml  roocRftn 

<ESC> 

= 

SEE    THIS    SCREEN    HGHIH 

^_ 

"Help  Screen  Editor"  lets  you  add  cus- 
tom help  screens  to  your  own  programs. 
This  sample  screen  was  created  for  use 
with  the  editor  program  itself. 


Programming  Notes 

To  add  help  screens  to  your  own 
programs,  follow  these  steps: 

1.  Be  sure  your  program  reserves 
space  for  text  page  2  just  as  Pro- 
gram 1  does,  with  POKE  104,12 
and  POKE  3072,0. 

2.  To  load  the  help  screen  into 
memory,  your  program  should  exe- 
cute the  command  BLOAD  file- 
name,A$800.  Make  sure  the 
filename  corresponds  with  the 
name  of  the  screen  file  on  the  disk. 

3.  To  swap  text  page  2  with  text 
page  1  and  make  the  help  screen 
visible,  your  program  should  exe- 
cute the  statement  POKE  - 16299,0. 
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To  return  to  the  original  screen, 
your  program  should  execute  the 
statement  POKE  - 16300,0.  If  you 
want  to  make  the  help  screen  visi- 
ble until  any  key  is  pressed,  use 
POKE  -16299,0:GET  G$:POKE 
-16300,0. 

For  instnjctions  on  entering  these  listings, 
piease  refer  to  "COMPUTEI's  Guide  to  Typing 
in  Programs"  pubiished  fhis  monlh  In  computei. 

Program  1 :  Screen  Editor 
Loader 

7;  10  HOME  :  POKE  104,12:  POKE  3 
072,0:  PRINT  CHR$(4);"RUN 
SE" 

Program  2:  Help  Screen 
Editor 

IE  10  HOME  :R  =  1:C  =  1 

7<  20    PRINT  CHR$  (4);"BL0flD  SEHE 

LP.SCR,A«a00" 
IS  30  POKE  -  16299,0:  GET  GS:  PO 

KE  -  16300,0 
62  40  ST«  =  "NEW  SCREEN" 
DC  50  DIM  LB  (23):  FOR  I  =  1  TO  2 
3:  READ  LS(I):  NEXT  :  DATA 
1024, 1152, 1280, 1408, 1536, 
1664, 1792, 1920, 1064, 1192, 1 
320, 1448, 1576, 1704, 1832, 19 
60,1104,1232,1360, 1483, 161 
6, 1744, 1872 
B9  60  DIM  CV(3):  FOR  I  =  1  TD  3: 
READ  CV(I>:  NEXT  :  DATA  3 
.6,27 
57  70  DS  =  CHR*  (4) 
56  80  GOSUB  590 

DE  90  VTAB  R:  HTAB  C:  GET  G$:6  = 
ASC  (B*) :  IF  e  >  31  THEN 
560 
fli  100  FDR  I  =  1  TD  3:  IF  G  =  CV 

(I)  THEN  120 
B9  110  NEXT  I:  GDTD  130 

120  ON  I  GOSUB  150,170,180:  G 

OTO    90 
130V=G-7:IFV<1ORV 

>  14  THEN  90 
140  ON  V  GDSUB  190,210,230,24 
0, 260, 300, 320, 330, 340, 430 
,470,480,510,530:  GOTO  90 
150  VTAB  24:  HTAB  1:  PRINT  "C 
LEAR  THE  SCREEN?  (Y/N)";: 
C5ET  Gt:  IF  G*  =  "Y"  THEN 
HOME 
160  GDSUB  590:  RETURN 
170  M  =  2:  GDSUB  590:  FLASH  : 

RETURN 
180  POKE  -  16299,0:  GET  G$:  P 

OKE  -  16300,0:  RETURN 

190  C=C-1:  IFC=0  THEN 

C  =  40:R  =  R  -  1:  IF  R  = 

0  THEN  R  =  23: C  =  40 

200  RETURN 

210  R=R-1:  IFR=0  THEN 

R  =  23 
220  RETURN 

230  GDSUB  190:  RETURN 
240  C  =  C  +  1:  IF  C  =  41  THEN 
C  =  1:R  =  R  +  1:  IF  R  = 
24  THEN  R  =  1:C  =  1 
250  RETURN 

260  NORMAL  :M  =  0:  BOSUB  380: 

VTAB  24:  HTAB  1:  POKE  34 

,23:  PRINT  "TITLE  TO  LOAD 

?  <RET>  =  QUIT  "; :  INPUT 
„  „  T5 


E6  270  IF  LEN  (T*)  <  1  THEN  290 
CB  280  ST*  =  T*:  PRINT  D*"BLDAD 

■';ST»;  ".SCR" 
83  290  POKE  34,0:  GDSUB  580:  60S 

UB  590:  RETURN 
iH   300  R  =  R+1;  IFR  =  24  THEN 

R  =  1 
15  310  RETURN 
18  320  M  =  0:  GOSUB  590:  NORMAL 

:  RETURN 
I?  330  RETURN 

D6  340  POKE  34,23:  VTAB  24:  HTAB 

1:  PRINT  "PRESS  <RET>  TO 

PRINT,  OTHER  TD  ABORT."; 

«  350  BET  G»:G  =  ASC  (6»):  IF  G 

=  13  THEN  370 
SE  360  PRINT  DS"PR#0":  POKE  34,0 

:  GDSUB  580:  BOSUB  590:  R 

ETURN 
SF  370  GOSUB  580:  POKE  34,23 
45  380  PRINT  D*"PR#i":  FOR  I  =  1 
TO  23:  FDR  J  =  0  TO  39: P 
=  PEEK  (LS(I)  +  J) 
18  390  IF  P  <  192  THEN  P  =  P  +  6 

4:  GOTO  390 
96  400  P  =  P  -  128:  IF  P  >  94  TH 

EN  P  =  P  -  64 
99  410  PRINT  CHR*  (P)  ; 
aC  420  NEXT  J:  PRINT  :  NEXT  I:  G 

DTD  360 
D3  430  GDSUB  580:  POKE  34,23:  VT 

AB  24:  HTAB  1:  PRINT  "GUI 

T  THE  EDITOR?  (Y/N) "; 
fl  440  GET  G»:  IF  G$  =  "Y"  THEN 

POKE  34,0:  HOME  :  END 
66  450  IF  G«  =  "N"  THEN  GDSUB  58 

0:  GOSUB  590:  RETURN 
IF  460  GOTO  440 
C9  470  M  =  1:  GDSUB  590:  INVERSE 

:  RETURN 
23  4B0  IF  LEN  (STt)  <  1  OR  ST*  = 
"NEW  SCREEN"  THEN  SOSUB 

510 
2?  490  NORMAL  :  GOSUB  580:  VTAB 

24:  HTAB  1:  PRINT  "SAVE  " 

;ST*;"?  (Y/N) "; :  BET  G«: 

IF  6*  =  "Y"  THEN  GOSUB  S8 

0:  PRINT  D«"BSAVE  "jST*;" 

. SCR, A*400, L4400" 
*F  500  GDSUB  580:  GOSUB  390:  RET 

URN 
EE  510  NORMAL  :  GOSUB  580:  HTAB 

1:  VTAB  24:  PRINT  "TITLE? 
(  <=  10  CHAR  )  "; :  POKE 

34,23:  INPUT  T*:  IF  LEN  ( 

T*)  >  10  THEN  PRINT  CHR* 

(7) :  BOTD  510 
C3  520  IF  LEN  (T«)  <  1  THEN  540 
ta   530  ST*  =  T4 
as  540  GOSUB  580:  POKE  34,0:  GOS 


GOSUB  580: 

UB  590 :R  =  1:C 

RETURN 
GDSUB  240:  RETURN 
PRINT  G*; :C  =  C  +  1: 

>  40  THEN  C  =  1:R  = 
1:  IF  R  >  23  THEN  R 
GOTO  90 
POKE  34,23:  VTAB 

1:  PRINT  :R  =  1 
OKE  34,0:  RETURN 
(3  590  NORMAL  :  VTAB  24:  HTAB  1: 

ON  M  +  1  GDBUB  610,620,6 
30 
CA  600  PRINT  "  EDITING  ";:  INVER 
SE  :  PRINT  ST*;:  NORMAL  : 

VTAB  1:  HTAB  1:  PRINT  CH 


n  550 

9D  560 


3F  570 
iE  580 


1:M  =  0: 


IF  C 
R  + 
=  1 


24:  HTAB 
C  =  1:  P 


R«  (  PEEK  (1024)) 
66  610  PRINT  "NORMAL  "; 
D3  620  PRINT  "REVERSED"; 
C3  630  PRINT  "FLASH    "; 


RETURN 
RETURN 
RETURN 
RETURN 


Attention  Programmers 

COMPUTE!  magazine  is  currently 
iooking  for  quality  orticies  on 
Commodore,  Atari,  Appie, 
ancd  iBM  computers  (inciuding 
the  Commodore  Amiga  and 
Atari  ST),  if  you  Inave  on 
interesting  Inome  application, 
educotionai  program, 
programming  utiiity,  or  game, 
submit  it  to  COMPUTE!,  P.O. 
Box  5406,  Greensboro,  NC 
27403.  Or  write  for  a  copy  of 
our  "Wrifer's  Guideiines." 


COMPUTE! 

TOLL  FREE 

Subscription 

Order  Line 

1-800-247-5470 

tnIA  1 -800-532- 1272 


COMPUTEI 
Subscriber  Services 

Piease  help  us  serve  you  better,  if  you 
need  to  contact  us  for  any  of  the 
reasons  listed  below,  write  to  us  at: 

COMPUTEI  Magazine 

P.O.  Box  10954 

Des  Moines,  lA  50340 

or  call  the  Toll  Free  number  listed  below. 

Chang*  Of  Addreu.  Piease  allow  us 
6-8  weeks  to  effect  the  change;  send 
your  current  mailing  label  along  with 
your  new  address. 

Renewal.  Should  you  wish  to  renew  your 
COMPUTEI  subscription  before  we 
remind  you  to,  send  your  current  mailing 
label  with  payment  or  charge  number 
or  coll  the  Toll  Free  number  listed  beiow. 

New  Subscription.  A  one  year  (12 
month)  us  subscription  to  COMPUTEI  is 

S24.00  (2  years.  $45.00;  3  years,  $65.00. 
For  subscription  rates  outside  the  US, 
see  staff  page).  Send  us  your  name 
and  oddress  or  call  the  Toll  Free  number 
listed  below. 

Delivery  Problems.  If  you  receive  dupli- 
cate issues  of  COMPUTEI,  if  you  experi- 
ence late  delivery  or  if  you  have  prob- 
lems with  your  subscription,  piease  call 
the  Toil  Free  number  listed  below. 

COMPUTE! 
1-800-247-5470 

In  lA  1-800-532-1272 
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PrtSc  Protector 


If  you've  ever  hit  Shift-PrtSc  by  mis- 
take and  accidentally  dumped  a  screen 
to  the  printer,  you'll  appreciate  this 
short  keyboard  patch  program.  It 
works  on  any  IBM  PC  with  PC-DOS 
2.0  or  higher. 


IBM  has  taken  a  good  deal  of  flak 
over  the  years  about  the  layout  of 
the  PC  keyboard.  One  major  com- 
plaint is  the  position  of  the  PrtSc 
(Print  Screen)  key:  It's  next  to  the 
righthand  Shift  key,  (This  has  been 
corrected  on  the  PCjr  and  PC-AT.) 
If  your  finger  goes  astray  and  acci- 
dentally hits  both  Shift  and  PrtSc, 
the  PC  suddenly  dumps  the  screen 
to  the  printer.  It's  particularly  an- 
noying when  you're  printing  a  long 
document  or  when  you  don't  have 
a  printer  attached.  If  there's  no 
printer,  the  PC  locks  up  until  it 
figures  out  that  there's  nothing  to 
print  to. 

On  the  other  hand,  it's  nice  to 
have  the  screen  dump  capability 
handy  when  you  need  it.  You 
wouldn't  want  to  completely  dis- 
able the  function,  but  it  would  be 
nice  if  it  were  a  little  harder  to  call 
by  accident. 

"PrtSc  Protector"  offers  a  good 
compromise.  It's  a  short  machine 
language  program  that  patches  into 
the  PrtSc  function  and  distin- 
guishes between  the  two  Shift  keys. 
If  you  press  the  right  Shift  key  with 
PrtSc,  nothing  happens.  If  you 
press  the  left  Shift  key  with  PrtSc, 
you  get  the  screen  dump  you  really 
wanted. 


Marc  Sugiyama 


The  program  below  is  a  BASIC 
loader  that  creates  the  machine  lan- 
guage file  N0PRTSC.COM  for  PrtSc 
Protector  directly  on  disk.  If  the 
BASIC  loader  detects  any  errors  in 
the  DATA  (highly  unlikely  if  you 
enter  the  program  using  COMPUTEl's 
Automatic  Proofreader"),  it  reports 
the  mistake  and  erases  the  incorrect 
file.  Because  the  file  has  the  exten- 
sion .COM,  you  can  activate  the 
program  simply  by  typing  the  file- 
name at  a  DOS  prompt: 

A>  NOPRTSC 

The  resident  portion  of 
NOPRTSC.COM  takes  only  about 
320  bytes  of  memory.  If  you  want 
to  dump  graphics  screens  to  the 
printer,  install  N0PRTSC.COM 
after  installing  GRAPHICS.  Don't 
try  to  install  GRAPHICS  more  than 
once,  or  the  computer  will  crash. 
Likewise,  don't  try  to  install 
N0PRTSC.COM  more  than  once 
(why  would  you  want  to?).  When 
NOPRTSC.COM  is  installed  suc- 
cessfully, it  returns  a  'zero  in  the 
ERRORLEVEL  variable;  otherwise, 
it  returns  a  one. 


IBM  PrtSc  Protector 

For  Instructions  on  entering  this  listing,  ptease 
refer  to  "COMPUTEl's  Guide  to  Typing  In 
Programs"  In  ttils  Issue  of  computei. 

if   100   CLS:LDCfiTE  10,  10:  PRrNT"Wr 

iting  file  ..." 
JA  110  OPEN  "noprtsc.com"  FOR  OU 

TPUT  OS  #1 
e?  120  FOR  1  =  1  TO  279:  READ  BYTE: 

CKSUM=CKBUM+BYTE 
6H  130  PRINT»1,CHR«(BYTE)  ; 
60  140  NEXT  I:  CLOSE  1 


OH  150  IF  CkSUM  <>  25301  THEN  PR 

INT"*«  Error  in  DATA  Btat 

einents  »»":KILL  "noprtsc. 

con": STOP 
UK  160  PRlNT:PRINT"File  for  nopr 

tsc.coin  has  been  created. 

" :  END 
WC   200  DATA  233,171,0,80,97,117 

, 100,80,83, SI, 82, 86 
W   210  DATA  87,83,180,2,205,22, 

168,2, 116,6, 156, 154 
UK  220  DATA  0,0,0,0,93,95,94,90 

,89,91,88,207 
LL   230  DATA  80,114,111,116,101, 

99, 116, 101, 100,32,80, 114 
JB   240  DATA  116,83,99,32,103,11 

0, 115, 116,97,108, 108, 101 
m      250  DATA  100,46,32,32,83,104 

,105, 102,116,45,80,114 
CL   260  DATA  116,83,99,32,117,11 

5, 105, 110,103,32,114, 105 
EI   270  DATA  103,104,116,45,115, 

104, 105, 102, 116,32,100, 10 

5 
E6   280  DATA  115,97,98,108,101,1 

00,46, 13, 10,36,30, 114 
Bf   290  DATA  111,116,101,99,116, 

101, 100,32,60, 114, 116,83 
LF   300  DATA  99,32,97,108,114,10 

1,97, 100, 121,32,105, 110 
ftB   310  DATA  115,116,97,108,108, 

101, 100,46, 13,10,36,82 
BN   320  DATA  101,113,117,105,114 

, 101, 115,32,68,79,83,32 
JE   330  DATA  50,46,48,32,111,114 

,32,97,98,111,118,101 
6E   340  DATA  46,13,10,36,0,0,180 

,48,203,33,60,0 
B6   350  DATA  117,9,186,143,1,180 

,9, 205, 33, 205, 32, 187 
DJ   360  DATA  36,1,177,4,211,235, 

67,137,30,172,1, 184 
HB   370  DATA  5,53,205,33,137,30, 

24,1,140,6,26,1 
EH   380  DATA  190,3,1,141,127,252 

,183,4,0,252,243, 166 
LJ   390  DATA  131,249,0,116,33,18 

0,9, 186,36,1,205,33 
Fit   400  DATA  184,5,37,186,7,1,20 

5,33,161,44,0,142 
11)   410  DATA  192,180,73,205,33,1 

84,0,49, 139,22, 172,1 
FO   420  DATA  205,33,186,106,1,18 

0,9,205,33,184,1,76      _ 
flB   430  DATA  205,33,0  ® 
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Apple  Error-Trapping 


Ann  Baldridge 


You  can  add  the  professional  touch  to 
your  BASIC  programs  by  checking  for 
common  user  errors — such  as  mis- 
typed filenames,  attempts  to  save  data 
files  on  write-protected  disks,  invalid 
input,  and  the  like.  This  article  shows 
how  any  Applesoft  program  can  be 
improved  with  proper  use  of  the  ON- 
ERR  statement.  The  technicjues  apply 
to  all  Apple  U-series  computers  with 
either  DOS  3.3  or  ProDOS. 


Computers  can  be  impolite.  If  you 
make  the  tiniest  little  nit-picking 
mistake,  they  balk  with  an  error 
message  and  interrupt  what  you 
were  trying  to  do.  Or  worse,  they 
sometimes  decide  to  freeze  up  and 
challenge  you  to  a  staredown. 

This  is  bad  enough  when  it 
happens  to  you.  But  if  you  write 
software  for  other  people  to  use, 
part  of  your  job  is  to  protect  them 
against  the  computer's  insistence 
on  perfection.  One  tool  you  can 
employ  is  an  Applesoft  BASIC 
command  that  is  underutilized  and 
even  mysterious  to  many  Apple 
programmers:  ONERR  {on  error). 

Picture  a  typical  user  who  has 
just  spent  a  half-hour  entering 
information  into  your  program.  The 
program  asks,  SAVE  TO  DISK?.  He 
taps  Y  in  response,  watches  the 
drive's  busy  light  come  on,  and 
then  reaches  over  and  pops  opens 
the  drive  to  make  sure  he's  saving 
to  the  right  disk — thereby  aborting 


the  save.  A  dumb  mistake?  Not  for 
a  beginner. 

Although  you  may  think  he 
deserves  to  hear  the  drive's  angry 
clacking  sound  and  the  error  beep, 
and  see  the  I/O  ERROR  warning 
and  the  now-mindless  blinking  cur- 
sor, you  can  keep  all  this  from  hap- 
pening. If  you  inserted  just  one 
instruction  before  the  save  rou- 
tine—ONERR  GOTO  500— your 
program  could  be  recovering  from 
this  mistake  in  whatever  way  you 
planned  in  line  500  and  beyond. 

Just  because  computers  can 
sometimes  be  impolite  doesn't 
mean  your  programs  must  be,  too. 

ONERR  Tools  And  Rules 

To  save  you  the  trouble  of  plowing 
through  piles  of  programming 
manuals  and  reference  guides,  not 
to  mention  the  hours  you  nright 
spend  experimenting,  I've  com- 
piled a  list  of  rules  to  follow  when 
trapping  errors  in  Applesoft  pro- 
grams. These  are  the  results  of  my 
own  trial- an d-error  efforts. 

1.  The  ONERR  command  must 
be  paired  with  GOTO,  not  GOSUB. 
Here's  the  proper  syntax: 

10  ONERR  GOTO  1000 

assuming,  of  course,  that  your 
error-handling  routine  begins  at 
line  1000.  If  you  try  pairing  ONERR 
with  GOSUB,  you'll  get  a  syntax 
error. 

2.  The  ONERR  command  must 
precede  the  statement  where  you 


anticipate  an  error  may  occur.  For 
instance,  if  you  want  to  protect 
against  the  disk  drive  input/output 
error  described  above,  the  ONERR 
command  must  be  executed  before 
the  save  routine.  ONERR  can  be 
included  in  a  multiple-statement 
line,  but  must  be  the  last  statement 
in  the  line.  {1  discovered  that  rule 
when  some  other  statements  fol- 
lowing the  ONERR  command 
evaporated.  Took  me  a  while,  too, 
because  none-  of  the  books  I  read 
mentioned  it.)  Most  programmers 
isolate  ONERR  GOTO  on  its  own 
line.  Now  you  know  why. 

3.  When  an  error  happens,  the 
computer  places  a  code  number 
identifying  the  error  into  memory 
location  222.  So  ERRNUM  =  PEEK 
(222)  yields  a  number  that  helps 
you  plan  what  to  do  next.  For  in- 
stance, the  numbers  between  1  and 
15  indicate  a  disk  operation  error. 
Some  of  these  error  codes  are  listed 
in  the  table  below. 

4.  The  command  RESUME  re- 
turns the  program  to  the  beginning 
of  the  statement  or  instruction 
where  the  error  occurred — but  not 
necessarily  to  the  beginning  of  the 
line.  It  acts  kind  of  like  RETURN, 
except  that  it  doesn't  come  back  to 
the  statement  or  line  after  the  state- 
ment which  called  it.  Let's  say  your 
program  contains  a  line  like  this: 
10  PRINT  A:PRINT  B:PRINT  C 

and  an  error  occurs  while  PRINT  B 
is  executed.  RESUME  returns  to  the 
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PRINT  B  statement— not  PRINT  A 
or  PRINT  C.  You  can  determine  the 
line  number  where  the  error  hap- 
pened with  this  statement: 

LINERR  =  PEEK(218)  +  PEEK(219)'256 

5.  You  can  turn  off  the  ONERR 
command  with  POKE  216,0.  If  you 
do  this  too  soon  after  an  error  oc- 
curs, however,  the  error  code  won't 
be  stored  in  memory  location  222. 

6.  There  are  some  problems 
with  ONERR  in  Applesoft.  You  get 
into  a  bunch  of  trouble  if  the  error 
happens  within  a  subroutine  or  a 
FOR-NEXT  loop  or,  heaven  forbid, 
both.  For  instance,  suppose  your 
program  encounters  a  few  errors 
while  executing  a  load  or  save  rou- 
tine within  a  nested  FOR-NEXT 
loop  that  is  inside  a  nested  subrou- 
tine. Boom.  Reset  City.  There  is  a 
very  short  machine  language  fix 
that  avoids  these  and  other  trou- 
bles. The  routine  is  included  (in  the 
form  of  DATA  statements)  in  lines 
3000-3020  of  Program  1.  You  must 
call  this  routine  before  you  POKE 
216,0.  (I  spent  two  days  chasing  a 
phantom  syntax  error  before  dis- 
covering this  rule.)  To  be  safe,  make 
POKE  216,0  the  last  command 
before  returning  from  the  error- 
handling  routine. 

7.  You  can  set  a  variable  to 
either  zero  or  one  depending  on 
whether  the  ONERR  routine  has 
been  called.  Known  as  setting  a  flag, 
this  technique  uses  an  IF-THEN 
statement  to  direct  the  route  of  the 
program. 

Not  A  Cure-Ali 

The  purpose  of  ONERR,  by  the 
way,  is  to  trap  system  errors  which 
may  occur  as  a  program  runs.  You 
should  not  rely  on  it  to  trap  your 
BASIC  programming  mistakes — 
errors  like  OUT  OF  DATA,  TYPE 
MISMATCH,  SYNTAX  ERROR, 
and  so  on.  Those  kinds  of  errors 
should  be  caught  when  you  test 
and  debug  the  program.  Too  many 
lazy  programmers  use  ONERR  to 
cover  their  inability  or  unwilling- 
ness to  find  and  correct  their  own 
errors. 

The  types  of  errors  you  should 
trap  with  ONERR  are  those  which 
can  be  anticipated  but  not  predict- 
ed: a  data  disk  that  is  left  out  of  the 
drive;  a  drive  door  that's  left  open;  a 
mistyped  filename;  or  a  data  disk 


filled  to  capacity.  In  these  cases, 
ONERR  routines  protect  the  user 
from  himself. 

Putting  Theory  To  Practice 

Program  1  shows  how  to  apply 
these  rules.  Note  that  this  program 
is  for  illustration  only,  not  to  be 
typed  in  and  run.  Notice  these 
variables: 

ER  is  the  error  flag.  When  set  to 
zero,  it  means  no  error  has  oc- 
curred. The  program  resets  the  flag 
to  one  when  a  problem  exists. 

EC  is  the  error  code  number 
PEEKed  from  location  222. 

Here's  how  the  program 
works: 

Line  10  sets  up  D$  as  the  DOS 
selector  code,  which  saves  key- 
strokes later  on. 

Line  20  sets  up  the  machine 
language  fixer  for  ONERR.  This 
subroutine  is  called  only  once. 

Lines  100  and  200  set  the  error 
flag  (ER)  to  zero  and  prepare  the 
ONERR  routine  to  be  called  if  nec- 
essary. Tip:  Put  the  ONERR  GOTO 
command(s)  into  a  REM  statement 
(e,g.,  100  ER  =  0:REM  ONERR 
GOTO  2000)  until  you've  fixed  all 
of  your  own  errors.  Otherwise,  sim- 
ple typos  and  logic  mistakes  will 
trigger  ONERR  and  call  your  error- 
handling  routine.  When  you're  sat- 
isfied the  program  works  the  way 
you  intended,  remove  the  REM  to 
activate  ONERR, 

Lines  110  and  210  ask  the  user 
to  enter  a  filename. 

Lines  120  and  220  are  the  im- 
portant ones.  You  must  put  your 
error  flag  and  IF-THEN  statements 
into  the  line  where  you  expect  trou- 
ble to  occur.  If  no  error  routine  is 
called,  the  line  goes  on  to  execute 
normally.  If  an  error  does  occur, 
then  line  2000  executes  (ONERR 
GOTO  2000). 

Line  2000  begins  the  error- 
handling  routine.  It  sets  the  error 
flag  to  one  (ER=1);  examines  the 
error  code  (EC  =  PEEK(222));  calls 
the  machine  language  fixer  routine 
at  memory  location  768  in  case  the 
error  was  within  a  subroutine  or 
FOR-NEXT  loop  (CALL  768);  and 
tells  the  program  to  continue  execu- 
tion at  the  beginning  of  the  state- 
ment where  the  error  happened 
(RESUME). 


What  happens  next  is  the  key. 
When  the  program  goes  back  to  the 
appropriate  statement  (in  this  case 
either  line  120  or  220),  the  error  flag 
(ER)  no  longer  equals  zero.  So, 
when  the  program  reaches  a  state- 
ment that  tests  IF  ER=0,  execution 
drops  to  the  next  line  (either  130  or 
230).  Lines  250  and  260  show  how 
to  use  the  error  flag  method  in  a 
multistatement  line.  Remember, 
RESUME  returns  to  the  beginning 
of  the  statement  where  the  error 
was  detected.  So  the  flag  must  be 
set  flag  in  a  second  location,  too. 

When  execution  drops  through 
to  line  130  or  230,  GOSUB  state- 
ments call  subroutines  which  print 
specific  information  depending  on 
the  problem  encountered.  Then  the 
ONERR  function  is  turned  off  with 
POKE  216,0  before  returning  to  let 
the  user  try  again.  You  may  wish  to 
carry  out  this  step  just  before  the 
RESUME  statement  in  the  error- 
handling  routine.  And  you'll  cer- 
tainly want  to  include  it  at  the  end 
of  each  disk  access  routine  to  stay 
aware  of  any  other  problems  which 
may  crop  up. 

Eliminating  Hostiilty 

Program  2  shows  the  changes  you 
could  make  to  lines  200-240  of  Pro- 
gram 1  if  you  wanted  to  save  text 
rather  than  program  files.  The  error 
flag  appears  in  line  220,  which 
writes  to  the  disk,  since  a  DISK 
FULL  or  similar  error  is  more  likely 
then.  Note  that  you  don't  have  to 
close  the  file  when  the  program 
drops  through  to  the  next  line. 
When  the  Apple  detects  an  error,  it 
clears  all  of  its  file  buffers,  which 
makes  closing  unnecessary. 

You  may  want  to  add  an  error 
flag  to  line  15,  too.  When  the  file  is 
opened,  an  error  could  result  if 
there's  no  disk  in  the  drive  or  if  the 
drive  door  is  open.  You  could  also 
precede  each  WRITE  command 
with  a  trap,  since  a  DISK  FULL 
error  bounces  the  program  back  to 
BASIC. 

The  error-message  routines  at 
lines  2100  and  2200  help  the  user 
find  out  what  happened  so  he  can 
correct  the  mistake  before  continu- 
ing. Although  brief,  they  are  writ- 
ten in  a  friendly  tone.  Frankly, 
beeping  the  computer  and  flashing 
I/O  ERROR  is  not  only  hostile,  but 
gives  beginners  no  clue  about  how 
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to  proceed. 

This  approach  to  error-trapping 
is  quite  flexible  and  adds  a  profes- 
sional touch  to  any  program.  Don't 
overdo  it,  though.  ONERR  is  best 
used  to  help  people  with  problems 
you  can't  handle  via  skilled  and 
careful  programming. 

Important  DOS  Error  Codes 


Code 

4 
6 


9 

10 


Error  Description 

Write-protected  disk 
File  not  found 
I/O  error 
Disk  full 
File  locked 


Note:  A  complete  list  of  error  codes  is  corn- 
monly  found  in  many  Apple  manuals  and 
hooks. 


For  Instructions  on  entering  tfiis  listing,  please 
refer  to  "COMPUTEI's  Guide  to  Typing  in 
Programs"  published  bimonthly  in  COMPUTE!, 

Program  1 :  ONERR  Demo 

e^  10  D$  =  CHR»  (4):  REM  SET  APP 

LE  DOS  SELECTOR 
f9  20  BDSUB  3000 

%    100  ER  =  0:  ONERR  GOTO  2000 
i2  110  INPUT  "WHAT  FILE  WOULD  YD 
U  LIKE  TO  SEE?"; FILE* 


F7  120  IF  ER  =  0  THEN  PRINT  Dt;  " 
LOAD  "FILE*:  60T0  140 

fl?  130  eOSUB  2100:  POKE  216,0:  G 
DTO  100:  REM  GO  BACK  TO  T 
RY  AGAIN 

•iC  140  PRINT  "HERE'S  YOUR  FILE." 

15  199  REM  SAVE  A  FILE 

'6  200  ER  =  0:  ONERR  GDTD  2000 

87  210  INPUT  "WHAT  FILENAME  WDUL 
D  YOU  LIKE  TO  USE?";FILE« 

Efl  220  IF  ER  =  0  THEN  PRINT  DS; " 
SAVE  "FILE*:  GOTO  240 

B*  230  GDSUB  2200:  POKE  216,0:  G 
DTO  200!  REM  GO  BACK  TO  T 
RY  AGAIN 

8?  240  PRINT  "YOUR  FILE  HAS  BEEN 
SAVED": GOTO  4000 

7B  1999  REM  ONERR  ROUTINES 

(3  2000  ER  =  1:EC  =  PEEK  (222): 
CALL  76B:  RESUME 

7»  2099  REM  LOADING  ERROR  MESSAG 
ES 

E3  2100  IF  EC  =  6  THEN  PRINT  "UN 
ABLE  TO  LOCATE  FILE  BY  T 
HAT  NAME.      PLEASE  CHE 
CK  TO  SEE  IF  YOU  SPELLED 
IT    CORRECTLY. " 

fC  2110  IF  EC  =  B  THEN  PRINT  "EI 
THER  YOUR  DISK  DRIVE  DOO 
R  IS  OPEN  OR   YOU  DON'T 
HAVE  A  DISK  IN  THIS  DRIV 
E-" 

75  2120  eaSUB  2300:  RETURN 

Zl  2199  REM  SAVING  ERROR  MESSAGE 
S 

47  2200  IF  EC  =  4  THEN  PRINT  "TH 
IS  DISK  IS  WRITE-PRDTECT 
ED.  PLEASE  REM 

OVE  THE  WRITE-PROTECT  TA 
B  OR   PUT  IN  A  NON-PRDTE 


CTED  DISK." 

4;  2210  IF  EC  =  B  THEN  PRINT  "EI 
THER  YOUR  DISK  DRIVE  DOO 
R  IS  OPEN  OR   YOUR  DISK 
IS  BAD. " 

4e  2230  IF  EC  =  9  THEN  PRINT  "TH 
IS  DISK  IS  FULL.  PLEASE 
INSERT  A       DIFFERENT 
DISK. " 

7F  2240  GOSUB  2300:  RETURN 

EO  2300  PRINT  :  PRINT  "PRESS  ANY 
KEY  TO  TRY  AGAIN.":  GET 
K*:  PRINT  K*:  RETURN 

CB  3000  FOR  I  =  0  TO  9:  READ  MT: 
POKE  768  +  I,MT:  NEXT  I 

5F  3010  DATA  104,168,104,166,223 
, 134,72, 152,72,96 

D9  3020  RETURN 

C5  4000  END 


Program  2:  Text  Save 
Routine 

flB  215  PRINT  D«;"OPEN  "FILE* 

hi   220  IF  ER  =  0  THEN  PRINT  D*;  " 

WRITE  "FILE*:  GOTO  240 
F3  230  GDSUB  2200:  POKE  216,0:  G 

DTD  200 
Ci  240  PRINT  "OKAY,  I'M  SAVINO  Y 

OUR  FILE  NOW." 
22  250  IF  ER  =  0  THEN  PRINT  A*: 

PRINT  B*:  PRINT  C*:  PRINT 
A:  PRINT  B:  PRINT  C:  IF 

ER  =  0  THEN  4000 
F9  260  GOSUB  2200:  POKE  216,0:  B 

OTO    200 


Nashua 


Boxed  in  tens, 
with  envel- 
opes, labels, 
write  protect 
tabs  and  Limi- 
ted Litetime 
Warranty. 

3y2"  ss 

51/4"  SS/DD 
5V4"  DS/DD 


Poly- bagged  in  quan(«lies 
ol  SO.  sold  in  quantities  of 
150. 


5y4"  SS/DD 
5V4"  DS/DD 


250*       500+ 

.54C  .53e 
.68C  .64e 


RIBBONS 

Sold  in  sixes  price  each 

Epson  MX-70/80    .  .  2.S9 

Epson  MX-100  ....  3,99 

Epson  LO  1500.  ...  4,99 
NBN 

Epson  LXBO 4.99 

Okiilala  Micro  801  / 

82A/83A/92/92   ...  1,29 

NEW 

Okidala  192/182  ...  5.99 

Okidala  l^icro 

84/94 !.90 

Diablo  Hylype  11...  3,19 

NEC  Spinwrler ....  SJ9 

C.  Iloh  Prowntef    .  .  .  3.«9 
APPLE  IMAGEWRITER. 

Black    3,45 

Color  6-Pack 4,75 


ROLLTOP 
FILES   f: 

V' 


3'/i"  model  '-'■ 

holds  55 17.49 

(Retail  Value  S24.95) 

5V«"  model 

holds  120 ?4.W 

(Helail  Value  S36 00) 


CALL  TOLL  FREE  1  800  USA-FLEX 

In  llfiiois  1  SOO-FOR-F1£X  7  lo  7  CwW  Time 

or1(3t2j3S1-9700  10  lo  3  Saturdays 

131 N.  Brandon  Drive  Glen(laleHeJghls,iL  e0139 


Shipping /handling  additional  Mifii- 
mtim  on3e<  SSflOO  Visa.  MasierCaid 
and  Prepaid  ofdera  aCceptCO  CoipO- 
ralions  ral«3  I1A2  of  bensf  and  qovem- 
ment  attouftis  are  accepied  on  a  nei 
30  bnsi&  COD  ordets  add  an  addi- 
iional  SS  00  spoctal  hQodlJng  chaige 
APO.  FPO,  AK.  Hi  g  Pfl  ordeis  add  an 
add-ifonai  5*b  lo  lhe  1o^a^  oidet*  amojri 
to  covei  PAL  and  insurance  Ho  Mies 
tax  outside  of  liiir>o45 
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?fl^ 


Professional 
handicapping  systems 


"3^ 


PRESiiNTED  UY  I'ROEESSOR   lONI-S  • 


?jzf 


GLO.  Thoroughbred  "Gold"  Edition^" 

A    FuH    feaiufpo  ihorougfiDred  ana'>-<iS  dosignet!  'of 
ine  pioiessiona  and  ire  senous  novice 
S1S9.95  complete 

EGLD.  Enhanced  "Gold"  Edition'"' 

Gold"  Edition  with  compleie  Master  Belior™  sysiem  iniegraled  onio  ihe 

Sime  dis^  Ttiis  poweiful  piogr^in  will  Transte*  all  horses  anp  scores  10  Ihi? 
tjet  Liialv^s  Ailh  a  "smgtp  (ncyst'oke 

iWaSTCi  BeiJOr'"  enclifded)  S199-95  COmD'fK' 

GLTD.  Limited  "GoW"" 

EnaDifls  Prottssional  Handicappers  \-q  assign  sppctic  -aiLies  to  ihe  facing 
variables  ftey  leel  are  imponanl  Creole  prograin  weigtii  based  en  a  pariicLilar 
IfflCK  and  Tme  tLine  li  !cr  maximum  wm  perceriage  Tnis  program  is  designed 
tor    ease  of  jse"   The  user  needs  no  programming  experience. 

(contains  Integrated  Betio'*"i  S299.95  compiet.' 
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News  &  Products 


Tax,  Telecommunications  Programs 

Arrays,  Inc.,  has  released  the  1985  ver- 
sion of  Tax  Advantage,  an  income  tax 
preparation  program  for  the  Commo- 
dore 64  and  128;  Apple  II,  II +  ,  He,  and 
lie;  Atari  800,  800XL,  and  130XE;  and 
IBM  PC,  XT,  and  AT  computers.  The 
package  aids  in  preparing  forms  1040, 
6251,  2106,  2441,  4562,  and  schedules 
A,  B,  C,  D,  E,  G,  SE,  and  W.  All  infor- 
mation can  be  printed  directly  onto  IRS 
forms  and  schedules.  In  addition,  Tax 
Advantage  performs  income  averaging, 
line  itemization,  and  minimun  tax  cal- 
culations. The  program  is  planned  for 
ease  of  use,  even  for  users  new  to  com- 
puters and  tax  preparation,  and  works 
with  Arrays'  The  Home  Accountant. 

Suggested  retail  price  is  $69.95.  For 
an  additional  $10  warranty  fee,  users 
can  purchase  next  year's  update  at  a 
substantial  price  reduction. 

Placing  and  answering  calls  on  the 
Commodore  64  can  be  done  automati- 
cally with  PlioueCall,  a  new  telecom- 
munications program  also  from  Arrays. 
It  can  be  used  to  access  online  data- 
bases such  as  The  Source  or  Compu- 
Serve, as  well  as  other  micro  and 
mainframe  computers.  The  program 
can  send  and  receive  both  text  and  pro- 
gram files,  and  can  convert  Compu- 
Serve files  to  Commodore  ASCII  files. 

PhoneCaU's  macro  capability  can 
store  numbers,  log  on  codes  and  billing 
information.  It  also  includes  a  small 
bulletin  board,  and  has  a  26K  buffer. 
The  program  comes  with  a  tutorial  and 
quick  reference  manual.  Suggested  re- 
tail price  is  S59.95. 

Arrays,  Inc. /Continental   Software, 
6711    Valjean   Avenue,   Van   Nui/s,   CA 
91406. 
Circle  Reader  Service  Number  190, 


Filing  Program  For  Atari  ST 

AtariSoft  and  Stoneware,  creator  of  the 
original  DB  Master  database  manage- 
ment system  for  several  different  mi- 
crocomputers, have  introduced  a  filing 
system  for  the  Atari  5205T  that  is  easy 
enough  for  first-time  computer  users. 
Called  DB  Master  One,  the  system  en- 
ables users  to  create  forms  with  differ- 
ent colors  and  typestyles,  or  engage 
ready-to-use    templates.    Reports    can 


also  be  easily  generated.  The  program 
can  hold  up  to  320K  files,  with  100 
fields  per  form,  3,000  characters  per 
record,  four  report  forms,  and  ten  re- 
port designs.  Suggested  retail  price, 
$49. 

Atari  Corp.,  1196  Borrfgas  Ave.,  P.O. 
Box  3427,  Sunnyvale,  CA  9i088-3i27 
Circle  Reader  Service  Number  191. 


Star  Gazing  On  The  Mac 

Halley's  Comet  has  been  included  in 
the  new  512K  Macintosh  version  of 
Tellstar,  Spectrum  HoloByte's  com- 
puter astronomy  software  package.  The 
program  can  track  the  comet  from  any 
location  and  on  any  date  and  time  from 
1980  to  1991.  Also'included  in  the  pro- 
gram are  displays  and  astronomical 
data  on  solar  bodies,  constellations,  and 
Messier  objects,  Tellstar  Level  1  includes 
all  basic  functions  and  one  star  table 
and  retails  for  $49.95;  Tellstar  Level  U 
comprises  three  detailed  star  tables  and 
retails  for  $79.95,  Versions  for  IBM  and 
Appie  II  computers  are  also  available. 

Orbiter,  another  new  release  from 
Spectrum  HoloByte,  is  a  space  shuttle 
simulation  and  game  with  3-D  graphics 
and  voice  synthesis  that  puts  the  player 
at  the  helm  of  NASA  operations.  Play- 
ers earn  points  based  on  missions  com- 
pleted and  performance  throughout  the 
entire  space  flight.  Orbiter  runs  on  the 
512K  Macintosh  and  sells  for  $49.95. 

Spectrum  HoloByte  Inc..  1050  Ylal- 
nut.  Suite  325,  Boulder,  CO  80302. 
Circle  Reader  Service  Number  192. 


Commodore,  Apple  II  Word  Processor 

Better  Working,  the  home  productivity 
software  brand  from  Spinnaker  Soft- 
ware, has  announced  its  Word  Processor 
with  Spellchecker  for  the  Commodore 
64/128,  the  Apple  II  series,  and  the 
Atari  ST  computers.  Word  Processor  is 
the  third  product  in  the  Better  Working 
line,  joining  Spreadsheet  and  File  and 
Report. 

The  new  package  combines  a  full- 
featured  word  processor  with  the 
50,000-word  American  Heritage  Dictio- 
nary Spellchecker,  The  three  Better 
Working  programs  are  integrated.  Sug- 
gested retail  for  Word  Processor  with 


Spellchecker  is  $59,95  for  the  Apple  II 
and  ST  versions  and  $49.95  for  the 
Commodore  version. 

Better  Working,  One  Kendall  Square, 
Cambridge,  MA  02139. 
Circle  Reader  Service  Number  193. 


Prime  Printers 

A  new  low  cost  dot-matrix  printer  has 
been  released  from  the  Japanese  com- 
pany Citizen  America  Corp.  Called  the 
I20D,  it  features  120  characters  per  sec- 
ond (cps)  printing,  graphics  capability, 
switch  selectable  IBM  and  Epson  com- 
patibility; a  25  cps  correspondence 
quality  mode;  and  a  standard  4K  buffer. 
List  price  is  $249. 

Another  new  printer  from  Citizen 
America,  the  Premiere  35,  is  a  letter- 
quality  daisywheel  printer  with  a  35  cps 
printing  speed  and  a  low  operating 
noise  level  of  55  decibels.  It  also  has  an 
8K  buffer,  an  LCD  display  of  print  func- 
tions and  error  messages,  and  selecta- 
ble proportional  spacing  for  justified 
text.  List  price  is  $599, 

Citizen  America  Corp.,  2425  Colora- 
do Ave.,  Santa  Monica,  CA  90404. 
Circle  Reader  Service  Number  194. 


New  From  Learning  Well 

Know  Logo,  an  educational  program  for 
grades  one  and  up,  has  been  released 
by  Learning  Well.  In  a  series  of  50 
games  and  discovery-based  activities. 
Know  Logo  provides  practice  in  turtle 
moves  and  turns,  estimating  angles, 
screen  distances  and  positioning,  and 
commands  for  circles  and  arcs.  It  re- 
quires a  basic  knowledge  of  Logo  com- 
mands. 

Also  new  from  Learning  Wei!  is 
Typing  Well,  a  typing  tutor  for  children 
and  adults.  Players  gobble  up  letters, 
create  word  pictures,  and  play  table 
tennis  as  they  sharpen  their  touch  typ- 
ing skills.  The  word-per-minute  speed 
is  automatically  adjusted  for  each  play- 
er, so  that  the  program  challenges  with- 
out  going  beyond  individual 
capabilities. 

Each  program  runs  on  the  Apple  II 
series  and  lists  for  $49.95 

Learning  Well,  200  S.  Service  Rd., 
Roslyn  Heights,  NY  11577. 
Circle  Reader  Service  Number  195. 
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Commodore  64  Talking  Text 

The  Votalker  C-64  speech  synthesizer 
from  Votrax  offers  three  types  of  text 
vocalization:  conversation  mode, 
which  reads  text  as  it's  spoken;  verba- 
tim mode,  which  reads  text  and  pro- 
nounces symbols;  and  character  mode, 
which  spells  each  word  and  pro- 
nounces numbers  and  symbols.  It  also 
has  a  screen  echo  that  allows  all  words, 
numbers,  punctuation  marks  and  other 
symbols  to  be  automatically  spoken  as 
they  are  printed  to  the  terminal  screen. 

The  four-by-five  inch  unit  plugs 
into  the  Commodore  64  expansion  port 
and  contains  its  own  amplifier,  speaker, 
and  external  speaker  jack.  Suggested 
retail  price  is  $99;  and  for  a  limited 
time,  those  who  purchase  the  Votalker 
C-64  will  receive  a  free  copy  of  Trivia 
Talker  II,  Votrax's  talking  trivia  game. 

Votrax,  Inc.,  1394  Rankin  Rd.,  Troy, 
MI  48083. 
Circle  Reader  Service  Number  196. 


The  Votalker  C-64  voice  synthesizer  speaks 
text  automatically  and  sells  for  $99.95. 


Modula-2  Programming  Language 

TDI  Software  has  announced  the  re- 
lease of  Modula-2/ST  programming 
language  for  the  Atari  ST,  in  addition  to 
versions  for  the  Amiga  and  Macintosh 
computers.  TDI  Modula-2 /ST  comes 
with  a  full  screen  editor  linked  to  the 
compiler,  and  flags  all  errors  during 
compilation.  It  also  has  a  full  GEM 
interface,  which  enables  the  user  to  ac- 
cess GEM  routines  including  GEM 
DOS,  windows,  mice,  menus,  and 
graphics. 

Suggested  price  is  $69.95. 

TDI  Software  Inc.,  10410  Markison 
Rd.,  Dallas,  TX  75238. 
Circle  Reader  Service  Number  197. 


Transparent  Technology  For 
Commodore 

Transparent  utilities — programs  that 
run  concurrently  with  other  programs 
but  only  appear  when  called  upon — are 
now  possible  for  the  Commodore  64 


through  Cardco,  which  recently  intro- 
duced StealthTec,  a  transparent  pro- 
gram interrupt  technology  on  a 
cartridge. 

Cardco's  first  product  to  use  this 
technology  is  Freeze  Frame,  a  transpar- 
ent screen  dump  utility,  A  couple  of 
keystrokes  will  send  whatever  is  dis- 
played on  the  computer  screen  to  the 
printer.  Freeze  Frame  is  compatible  with 
all  programs  and  languages,  and  sup- 
ports any  printer  or  interface  which 
emulates  the  Commodore  1525,  as  well 
as  Epson-  and  Okidata-compatible 
printers.  It  retails  for  $49.95. 

A  second  program  in  this  line  (un- 
named at  press  time)  is  similar  to  Bor- 
land's Sidekick  for  the  IBM-PC.  The 
product  offers  access  to  things  like  a 
calculator,  appointment  calendar,  tele- 
phone directory/database,  and  a  memo 
writer.  Any  of  the  functions  can  be 
called  up  while  another  program  is  run- 
ning. Suggested  retail  price  is  S69.95. 

Cardco  plans  to  make  the  Stealth- 
Tec  technology  available  for  licensing 
by  other  software  vendors, 

Cardco,  Inc.,  300  S.  Topeka,  Wichita, 
KS  67202 
Circle  Reader  Service  Number  198. 


Hippopotamus  Introduces  14  ST 
Products 

Hippopotamus  Software  has  an- 
nounced an  initial  line  of  14  programs 
for  the  Atari  ST.  The  products  take 
advantage  of  the  ST's  GEM  environ- 
ment, incorporating  pull-down  menus, 
windows,  and  online  help  screens. 

The  line  includes  HippoWord,  a 
mouse-based  word  processor  ($89.95); 
Hippo  Concept,  an  idea  organizer  com- 
patible with  HippoWord  ($89.95); 
HippoSimple,  a  database  manager 
($49.95);  Hippo  Disk  Utilities,  compati- 
ble with  floppy  and  hard  disks  ($49.95); 
HippoBackgammon,  using  full-color  ani- 
mated graphics  ($39.95);  Hippo  Com- 
puter Almanac,  a  combination 
game/reference  tool  that  contains  more 
than  35,000  facts  ($34.95);  and  Hippo- 
Pixel,  which  allows  users  to  create  their 
own  sprites  and  fonts  ($39.95). 

Hippopotamus  Software,   Inc.,   985 
University  Ave.,  Suite  12,  Los  Gatos,  CA 
95030 
Circle  Reader  Service  Number  199. 


Classics  On  Computer  For  Apple  II 

An  educational  game  based  on  the 
book  Treasure  Island  has  been  intro- 
duced by  Classics  On  Computer.  Ap- 
propriate for  either  home  or  classroom 
use,  the  program  contains  a  high- 
resolution  graphics  game  board,  a  short 
review  game,  and  a  special  manual  for 
teachers. 

Treasure  Island  is  designed  to  im- 


prove reading  skills  and  build  vocabu- 
lary. It  is  recommended  for  grades  5-9. 
Available  for  the  Apple  II,  II -h,  or  Ap- 
ple He  with  minimum  48K  memory,  the 
program  retails  for  $39.95. 

Classics  On  Computer,  5150Wilshire 
Blvd.,  Suite  502,  Los  Angeles,  CA  90036. 
Circle  Reader  Service  Number  200. 


Low-Cost  Word  Processor  For 
IBM-PC 

Dae  Software,  has  announced  Dae  Easy 
Word,  a  versatile  word  processor  for  the 
IBM-PC. 

The  program  features  the  ability  to 
work  on  four  different  documents  si- 
multaneously (using  DAC  Windows); 
automatic  hyphenation;  file  merges; 
automatic  search;  page  numbering;  and 
word  count.  It  requires  256K  memory 
on  the  IBM-PC,  and  retails  for  $49,95. 

Dae  Software,  Inc.,  4801  Spring  Val- 
ley Rd.,  Building  HOB,  Dallas,  TX  75244 
Circle  Reader  Service  Number  201. 


SpeedScript  Enhancer  For  64 

Upstart  Publishing  has  released  Speed- 
pak,  an  enhancement  to  compute!'s 
popular  SpeedScript  word  processor 
(Commodore  64  versions  3.0-3.2).  The 
program  adds  six  new  commands,  three 
printer  codes,  and  eight  user-definable 
31 -character  macro  phrase  keys. 

Additional  features  include  alter- 
nate screens,  which  enable  switching 
between  and  editing  two  documents 
instantly;  a  help  screen  and  onscreen 
font  installer,  32-character  encryption, 
code  conversion  to  Commodore  ASCII 
or  screen  codes;  default  selection  to 
disk/tape  storage,  set  printer  device 
and  secondary  address;  and  a  Dvorak 
keyboard  option. 

Speedpak  comes  with  printed  in- 
structions and  includes  three  disk- 
based  tutorials  and  three  sample  files. 
Price,  $15. 

Upstart  Publishing,  Dept.  SP-NP2, 
P.O.  Box  22022,  Greensboro,  NC  27420 
Circle  Reader  Service  Number  202. 


Word  Munchers  On  The  Apple 
A  world  of  Munchers  and  Troggles 
awaits  the  player  of  Word  Munchers,  a 
new  educational  game  for  grades  one 
through  five,  from  Minnesota  Educa- 
tional Computing  Corporation 
(MECC).  Players  move  their  Word 
Muncher  around  a  game  screen  and 
direct  it  to  eat  words  that  have  a  partic- 
ular vowel  sound,  while  avoiding  the 
enemy  Troggles.  Word  Munchers  be- 
comes progressively  more  difficult  at 
higher  levels.  Teachers  can  determine 
which  vowel  sounds  are  used  and  can 
control  the  level  of  word  difficulty. 
About  1700  words  of  varying  difficulty 
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can  be  used. 

Word  Muiichers  runs  on  all  Apple  II 
computers  with  at  least  64K  memory. 
Use  of  a  joystick  is  optional.  A  support 
manual  is  included.  Suggested  retail 
price,  $49. 

Mmiiesota  Educational  Computing 
Corporation,  3490  Lexington  Ave.  North, 
St.  Paul,  Minnesota  55126-8097 
Circle  Reader  Service  Number  203. 


HomePak,  BafteryPak  For  Mac 

Batteries  Included's  HomePak  and  Bat- 
teryPak  programs  have  been  developed 
for  the  Macintosh.  HomePak  is  a  three- 
in-one  telecommunications/  word  pro- 
cessing/database manager  program 
with  macro  command  capability.  Bat- 
ten/Pak  is  a  set  of  nine  accessories:  Cal- 
endar, with  Daytimer,  keeps  track  of 
appointments  and  deadlines;  the  250- 
page  Phonepad  stores  and  retrieves 
phone  numbers;  Automatic  Modem/ 
Phone  Dialer  automatically  dials  any 
number  listed  in  Phonepad  or  Calen- 
dar; Scientific  Calculator  includes  sta- 
tistical, logarithmic  and  trigonometric 
functions;  RPM  Calculator  is  for  every- 
day calculating;  a  7-function  disk  utility 
includes  Trash,  Copy,  and  Rename 
commands;  High-Speed  Launcher 
transfers  to  and  from  any  program; 
Print  Text  creates  draft  copies  while 
continuing  to  use  the  Mac;  Windows 


Listing  brings  any  window  to  the  front 
of  the  screen. 

Suggested  retail  price  of  HomePak 
is  $69.95;  for  Batten^Pak,  $49.95. 

Batteries  Included,  17875  Sky  Park 
North,  Suite  P,  Irvine,  CA  92714 
Circle  Reader  Service  Number  204. 


ST  Telecommunications 

Online  databases  and  bulletin  boards 
can  be  accessed  from  the  Atari  520ST 
using  Atari's  Fastcom  telecommunica- 
tions software.  The  program  features 
integrated  ASCII,  VTIOO,  and  Viewdata 
modes;  GEM  drop  down  menus;  trans- 
mission of  text  and  binary  files;  macro 
commands;  multi-tasking;  full  Prestel 
functions;  printing  of  both  graphics  and 
text;  and  autodial  and  auto  answer  mo- 
dem support. 

The  program  comes  with  user  guide 
and  reference  manual,  and  lists  for  $69. 

Atari  Corp.,  1196  Borregas  Ave.,  P.O. 
Box  3427,  Sunnyvale,  CA  94088-3427 
Circle  Reader  Service  Number  205. 


Electronic  Word  Book 

Richard  Scarry's  Best  Electronic  Word 
Book  Ever!,  a  new  program  from  CBS 
Software,  is  a  picture  and  word  game 
from  children's  author  and  illustrator 
Richard  Scarry.  Word  recognition,  vo- 
cabulary building,  and  objects  recogni- 


tion are  developed  as  players  travel 
with  Lowly  Worm  to  six  different  color- 
ful environments:  a  farm,  a  town,  a 
park,  a  railroad  yard,  a  construction  site 
and  a  harbor.  In  each  environment, 
players  learn  to  identify  objects  and 
associate  them  with  their  printed 
names.  Animated  graphics  and  familiar 
childhood  tunes  are  used  in  each  of  the 
game's  four  skill  levels.  For  the  Apple  11 
family  and  the  Commodore  64  and  128. 
Suggested  retail  price,  $19.95. 

Ci3S  Software,  One  Fawcelt  Place, 
Greenzvich,  CT  06836 
Circle  Reader  Service  Number  206. 


ST  Software  From  Spinnaker 

Spinnaker  Software  has  released  Atari 
520ST  versions  of  several  of  their  more 
popular  programs.  Homework  Helper 
Math  and  Homework  Helper  Writing, 
two  educational  programs,  sell  for 
$49.95  each;  Amazon,  Dragonworld, 
Fahrenheit  453,  Nine  Princes  in  Amber, 
and  Perry  Mason:  The  Case  of  the  Manda- 
rin Murder,  all  graphics-and-text  ad- 
venture games  also  sell  for  $49.95  each; 
Treasure  Island  and  Wizard  of  Oz,  from 
the  Windham  Classics  series,  sell  for 
$39.95  each;  and  Kung  Fu:  The  Way  of 
the  Exploding  Fist  sells  for  $39.95. 

Spinnaker   Software,    One    Kendall 
Square,  Cambridge,  MA  02139 
Circle  Reader  Service  Number  207.        © 
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Flight  simulation 
Aircraft  simulotion 
Fantasy  game 

• 
• 
• 

• 
• 
« 
• 

• 
« 

1,  1.        Typing  Tutor  III 

2,  2.       Math  Blasterl 

3,  3.        New  IrDproved 

l^aslerType 
A.            4.       Music  Construction  Set 
5.            5.       Sky  Travel 

Hnmtt  MfinnnAmAnt  ...  

Simon  Si  Schuster 
Davidson 

ScartDorough 

Electronic  Arts 
Commodore 

Typing  instruction  program 
Introductory  math  program, 
ages  6-12 
Typing  instruction  program 

Music  composftton  program 
Astronomy  learning  program 

• 

• 

• 

a 

1 .  1 .       Print  Shop                              Broderbund              Do-it-yourself  print  shop 

2.  2.        The  Newsroom                        Springboard              Do-it-yourself  newspaper 

3.  A.       Print  Shop  Graphics               Brsderbund              Upgraded  graphics  library 

Library  II 

4.  5.       Print  Shop  Graphics               Bredefbund               100  additional  graphics 

Library 

5.  Three-In-One  Bundle              Timeworks                Word  processor,  spreadsheet, 

database  manager 

Copyright  1985  by  Billboard  Publtcuilons.  Inc.  C<3mplled  by  the  Billboard  Research  Department  aixl  r^pc/nfed  try  permission.  Data  as 
li/iO/Si  (oducotlort  one/  home  mar>agen>ent). 
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SpeedCalc 

For  Apple  II  Computers 


Kevin  Martin 


In  response  to  popular  request,  COM- 
PUTE! presents  this  professional-quality 
spreadsheet  program  for  all  Apple  11- 
series  computers  with  either  DOS  3.3 
or  ProDOS.  Written  completely  in 
high-speed  machine  language,  Apple 
SpeedCalc  has  all  the  important  fea- 
tures you'd  expect  from  a  commercial 
spreadsheet  program.  In  addition,  its 
data  files  can  be  merged  into  text  files 
created  with  the  Apple  SpeedScript 
word  processor  published  last  year  in 
COMPUTE!.  Apple  SpeedCalc  re- 
quires a  disk  drive,  and  a  printer  is 
optional  but  recommended. 


Have  you  ever  planned  a  budget  for 
your  home  or  office?  If  so,  you 
probably  used  some  sort  of  work- 
sheet divided  into  rows  and  col- 
umns. Perhaps  you  wrote  the 
months  of  the  year  along  the  top  of 
the  sheet  and  listed  categories  for 
earnings  and  expenses  along  one 
side.  After  entering  data  for  each 
category  and  month  of  the  year, 
you  could  calculate  total  income 
figures  by  adding  or  subtracting 
numbers  in  each  of  the  sheet's 
"cells," 

That's  a  classic  example  of  a 
worksheet.  It  lets  you  enter  and 
organize  data,  then  perform  calcu- 
lations that  produce  new  infor- 
mation. A  spreadsheet  program  is  an 
electronic  version  of  the  familiar 
paper  worksheet.  Since  it  does  all 
the  calculations  for  you  at  lightning 
speed,  an  electronic  spreadsheet  is 
far  more  convenient  than  its  paper 
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counterpart.  And  spreadsheet  pro- 
grams also  offer  editing  features 
that  let  you  enter  and  manipulate 
large  amounts  of  data  with  a  mini- 
mum of  effort. 

Apple  SpeedCalc  is  an  all  ma- 
chine language  spreadsheet  pro- 
gram for  Apple  II  computers  with 
either  DOS  3,3  or  ProDOS.  Though 
relatively  compact  in  size,  Speed- 
Calc is  fast,  easy  to  use,  and  has 
many  of  the  features  found  in  com- 
mercial spreadsheet  programs. 
Even  better,  the  "SpeedScript  File 
Convertor"  program  lets  you  merge 
your  SpeedCalc  files  into  word  pro- 
cessing documents  created  with 
SpeedScript,  COMPUTE!'s  popular 
word  processor  (see  COMPUTE!,  July 
1985,  or  SpeedScript:  The  Word  Pro- 
cessor for  Apple  Personal  Computers, 
published  by  CdMPUTE!  Books), 

Working  together,  SpeedCalc 
and  SpeedScript  make  a  powerful 
team.  You  can  merge  a  chart  of 
sales  figures  into  a  company  report, 
create  a  table  of  scientific  data  for  a 
term  paper,  and  manipulate  numer- 
ic information  in  many  other  ways. 
In  a  sense,  a  spreadsheet  program 
brings  to  arithmetic  all  of  the  flexi- 
bility and  power  that  a  word  pro- 
cessor brings  to  writing. 

Preparing  The  Program 

Although  Apple  SpeedCalc  is  small 
in  comparison  to  similar  commer- 
cial programs,  it  is  one  of  the  long- 
est programs  COMPUTE!  has  ever 
published.  Fortunately,  the  "Apple 
MLX"  machine  language  entry  util- 
ity makes  it  easier  to  type  a  pro- 
gram of  this   size.   Be  sure   to 


carefully  read  the  Apple  MLX  arti- 
cle elsewhere  in  this  issue  before 
you  begin. 

We're  publishing  two  separate 
versions  of  Apple  SpeedCalc:  Pro- 
gram 1  is  for  Apple  computers  with 
DOS  3.3,  and  Program  2  is  for  Ap- 
ples with  ProDOS.  Be  sure  to  type 
the  correct  version  for  your  system, 
since  the  DOS  3.3  version  doesn't 
work  with  ProDOS  and  vice  versa. 

Since  the  DOS  3.3  version  of 
SpeedCalc  resides  in  the  same  area 
of  memory  normally  used  by 
BASIC  programs,  you  must  relocate 
the  BASIC  program  storage  area 
before  loading  MLX  to  enter  the 
data  for  SpeedCalc.  If  you're  using 
DOS  3.3,  enter  the  line  below  in 
direct  mode  (without  a  line  num- 
ber) and  press  RETURN: 

POKE  104,38:POKE  9728,0:NEW 

Then  load  and  run  MLX. 

If  you're  using  ProDOS,  no 
special  actions  are  required  before 
loading  and  running  MLX. 

Here  are  the  addresses  you 
need  to  enter  SpeedCalc  with  Apple 
MLX: 

DOS  3.3; 

Starting  address;  07FA 

Ending  address;  24F9 

ProDOS: 

Starting  address;  2000 

Ending  address:  3D67 

After  you  finish  typing,  be  sure 
to  save  at  least  one  copy  before 
attempting  to  run  SpeedCalc  for  the 
first  time.  To  start  the  DOS  3.3  ver- 
sion, first  enter  BLOAD  SPEED- 
CALC (replace  SPEEDCALC  with 
the   appropriate   filename   if   you 
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COMPUTE!  Disk 


All  the  exciting  programs  from  the  past  three  issues  of  COMPUTE!  are  on 
one  timesaving,  error-free  floppy  disk  that  is  ready  to  load  on  your  Apple 
II,  II  +  ,  He,  and  lie  computers.  The  February  1986  COMPUTE!  Disk  contains 
the  entertaining  and  useful  Apple  II  programs  from  the  December  1985  and 
January  and  February  1986  issues  of  COMPUTE!.  This  easy-to-use  disk  also 
features  SpeedCalc,  the  spectacular  new  spreadsheet  program  written  en- 
tirely in  machine  language  for  the  Apple  Il-series,  and  the  latest  version  of 
SpeedScript,  the  bestselling  word  processing  program. 

The  February  1986  COMPUTE!  Disk  costs  $12.95  plus  $2.00  shipping  and 
handling  and  is  available  only  from  COMPUTE!  Publications. 

For  added  savings  and  convenience,  you  may  also  subscribe  to  the  COM- 
PUTE! Disk.  At  a  cost  of  only  $39.95  a  year  (a  $12.00  savings],  you'll  receive 
four  disks,  one  every  three  months.  Each  disk  will  contain  all  the  programs 
for  your  Apple  II  machine  from  the  previous  three  issues  of  COMPUTE!. 

This  is  an  excellent  way  to  build  your  software  library  while  you  enjoy  the 
quality  programs  from  COMPUTE!. 

Disks  and  subscriptions  are  available  for  Apple,  Atari,  Commodore  64  and 
128,  and  IBM  personal  computers.  Call  for  details. 

To  subscribe  to  the  COMPUTE!  Disk,  call  toll  free  1-800-247-5470  or  write 
COMPUTE!  Disk,  P.O.  Box  10036,  Des  Moines,  Iowa  50950. 
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used  some  other  name  when  saving 
the  program).  After  the  program 
loads,  simply  type  RUN  as  you 
would  for  a  BASIC  program.  To 
start  the  ProDOS  version  of  Speed- 
Calc,  first  boot  ProDOS,  then  enter 
-SPEEDCALC  (replace  SPEED- 
CALC  with  the  appropriate  file- 
name if  you  used  some  other  name 
when  saving  the  program).  This  re- 
moves the  BASIC  interpreter  and 
lets  SpeedCalc  take  over  the  system. 
If  you're  using  an  Apple  He  or 
lie,  be  sure  the  Caps  Lock  key  is 
down:  SpeedCalc  doesn't  accept 
lowercase  text  input. 

The  Apple  SpeedCalc 
Screen 

SpeedCalc  uses  the  top  line  of  the 
screen  as  the  command  line.  This  is 
where  SpeedCalc  displays  message^ 
and  asks  you  questions. 

Screen  lines  2-4  are  the  input 
buffer  area.  This  is  the  work  area 
where  you  enter  and  edit  data.  As 
you'll  see  in  a  moment,  the  input 
buffer  also  displays  the  data  con- 
tained in  the  current  cell.  The  work 
area  cursor  is  an  inverse  less-than 
symbol  (<).  When  the  cursor  is  sol- 
id (nonblinking),  SpeedCalc  is  wait- 
ing for  a  command  or  for  data  to  be 
entered.  After  a  character  of  data 
has  been  entered,  the  cursor  begins 
blinking.  While  the  cursor  is  blink- 
ing, most  SpeedCalc  commands  (ex- 
cept for  the  cursor  movement  keys) 


are  deactivated  until  you  press  RE- 
TURN to  enter  the  data  into  the 
worksheet. 

The  lower  20  screen  lines  are 
your  window  into  the  spreadsheet. 
Though  the  spreadsheet  contains 
many  rows  and  columns,  only  a 
few  can  fit  on  the  screen  at  one 
time.  By  scrolling  the  screen  back 
and  forth  with  the  cursor,  you  can 
move  the  display  window  to  any 
part  of  the  spreadsheet. 

The  SpeedCalc  worksheet  con- 
sists of  50  vertical  columns  labeled 
with  letters  (AA,  AB  ...  BX)  and  200 
horizontal  rows  numbered  from 
1-200.  The  rectangle  where  a  row 
and  column  intersect  is  called  a  cell. 
Cells  are  where  you  store  data. 
With  50  columns  and  200  rows,  the 
SpeedCalc  spreadsheet  has  a  maxi- 
mum of  10,000  (50*200)  cells.  Due 
to  memory  limitations,  however, 
only  about  a  third  of  these  can  actu- 
ally contain  data.  But  you  may 
spread  out  the  data  over  all  10,000 
cells  if  necessary,  depending  on  the 
format  you  need. 

Moving  The  Cursor 

Each  cell  is  identified  with  the  let- 
ters of  its  column  and  the  number 
of  its  row.  For  example,  the  cell  at 
the  extreme  upper-left  comer  of  the 
sheet  is  called  AAl,  since  it's  in 
column  AA  and  row  1.  The  cell 
below  that  is  AA2.  Moving  one  cell 
to  the  right  from  AA2  puts  you  in 


cell  AB2,  and  so  on. 

Your  current  position  in  the 
spreadsheet  is  shown  by  the  high- 
lighted ciursor.  The  simplest  way  to 
move  around  the  sheet  is  with  the 
cursor  keys  (on  the  Apple  II  or  IH-, 
use  CTRL-K  to  move  up  and  CTRL- 
J  to  move  down).  Another  way  to 
move  the  cursor  is  with  CTRL-@ 
(CTRL-SHIFT-P  for  the  Apple  II  or 
II -f,  or  CTRL-2  for  the  Apple  He 
and  lie.)  Press  CTRL-@  once  to 
"home"  the  cursor  on  the  current 
screen:  The  cursor  moves  to  the 
upper-left  cell.  Press  CTRL-@  twice 
in  succession  to  move  the  cursor  to 
cell  AAl,  the  home  position  for  the 
entire  sheet. 

SpeedCalc  also  has  a  goto  com- 
mand for  moving  the  cursor  over 
long  distances.  When  you  press 
CTRL-G,  the  command  line  dis- 
plays GOTO:  followed  by  an  un- 
derline cursor.  The  underline  cursor 
generally  indicates  that  SpeedCalc  is 
waiting  for  data — in  this  case  it  ex- 
pects the  name  of  the  cell  where 
you  wish  to  go.  If  you  enter  BA188 
at  this  point,  SpeedCalc  moves  the 
cursor  to  the  cell  at  column  BA  in 
row  188,  adjusting  the  screen  win- 
dow as  needed.  Take  a  few  mo- 
ments to  practice  moving  around 
the  spreadsheet  with  all  three 
methods;  you'll  be  using  them  a  lot. 
In  a  later  section,  we'll  discuss  how 
to  change  the  size  and  format  of  a 
cell. 


SpeedCalc  Keyboard  Reference 


Use  [control!  °''  JCTRLJ 

with  most  commands 
App1«  lie  Keyboard  Shown. 
Apple  tie,  11+  slmjlar 


Ch*ngf  Column 

Width 


w/Op  Ap: 
Changes  «1l 
columftj 


Recalculate 


Open 
Apple 
Toggle 
(11,11+) 


Home 
Cursor 


T  I  Cursor 

Lull 


-Qm® 


AvaiUble 
Mtfnory 


Chvige 

Oec4m<1 

P1«fS 


Reojlculation 
On/Off 


w/Op  Ap: 
Show  Stitui 


Edit  Cell  i 


ft^foniwii 


Print  to  Prfriter 


w/Op  Ap; 
Print  to  Screen, 
Disk,  or  Printer 


QQQID1o]|p3D(IDQ 


R 


Sdve^ 


coQtml 


»hin 


Exit 
SpeedCalc 


Op  Ap 

[Open  Apple] 
Clle,  llo) 


Copy  Block 
(Verbatim) 


w/Op  Ap: 
Relative 


Disk 
l>ireetorg 


aaaam 


■{loid] 


Blank 
Cell 


Goto  Cell 


New :  Erise 

all  cePf 


Change  Cell 
Format 


Move  Block 
(Verbatim) 


w/Op  Ap: 
Relative 
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Keyboard  Commands 

SpeedCalc  offers  many  different 
commands,  a  few  of  which  are  en- 
tered by  pressing  one  key.  How- 
ever, most  commands  are  entered 
by  pressing  CTRL  along  with  an- 
other key.  CTRL-G,  as  you've  seen, 
is  the  goto  command.  CTRL-A  dis- 
plays the  amount  of  free  memory 
available,  and  so  on.  The  most  dras- 
tic command  is  CTRL-X,  which  ex- 
its SpeedCalc  and  reboots  the  sys- 
tem. Since  this  effectively  erases  all 
data  in  memory,  SpeedCalc  prompts 
you  with  ARE  YOU  SURE  Y/N? 
before  it  shuts  down.  To  cancel  the 
command,  simply  type  N  (or  any 
key  other  than  Y). 

A  few  commands  require  you 
to  press  three  keys  at  once.  This 
sounds  more  awkward  than  it  is  in 
practice,  since  two  of  the  three  keys 
are  Open  Apple  and  CTRL.  For  in- 
stance, the  relative  copy  command 
is  performed  by  pressing  Open 
Apple-CTRL-C  (hold  down  Open 
Apple  and  CTRL,  then  press  C). 

The  older  Apple  II  and  II -h 
models  don't  have  an  Open  Apple 
key,  so  ESC  is  programmed  to  act  as 
an  Open  Apple  toggle.  Pressing 
ESC  once  makes  all  following  key- 
presses behave  as  if  they  were  pre- 
ceded by  Open  Apple.  Pressing 
ESC  again  turns  off  this  effect.  In 
this  article,  wherever  the  instruc- 
tions call  for  the  Open  Apple  key, 
Apple  II  and  11+  owners  should 
instead  precede  the  keypress  with 
ESC,  then  use  ESC  again  after- 
wards to  disable  the  Open  Apple 
toggle.  For  example,  the  command 
to  check  the  recalculation  status  is 
Open  Apple -CTRL-R;  Apple  II  and 
II -I-  owners  should  instead  press 
(and  release)  ESC,  then  press 
CTRL-R.  There's  no  visible  indica- 
tion that  the  Open  Apple  toggle  is 
in  effect,  so  you  must  use  ESC  care- 
fully or  your  keypresses  will  have 
unexpected  results.  For  safety,  al- 
ways remember  to  press  ESC  again 
.to  toggle  this  function  off  after 
using  a  command  that  requires 
Open  Apple.  The  table  lists  all  the 
SpeedCalc  commands,  and  the  fig- 
ure shows  the  keyboard  layout  with 
a  description  of  what  each  key 
does.  We'll  be  discussing  each  com- 
mand in  more  detail  below. 

Three  Data  Types 

Before  entering  any  data,  you  must 
know  what  kind  of  data  SpeedCalc 


accepts.  There  are  three  different 
types:  numbers,  text,  and  formulas. 
Let's  look  at  each  type  in  turn. 

1.  Numeric  data  consists  of  num- 
bers— the  basic  stuff  that  spread- 
sheets work  with.  SpeedCalc  has  a 
few  simple  rules  for  numeric  data: 
A  number  must  be  a  decimal  value 
(base  10,  not  hexadecimal)  com- 
posed of  one  or  more  digits  from 
0-9,  with  an  optional  plus  or  minus 
sign.  A  decimal  point  is  also  option- 
al. If  you  include  any  other  charac- 
ters in  numeric  input,  SpeedCalc 
treats  the  entire  input  as  text  data 
(as  explained  below).  Thus,  the 
numbers  123,  .001,  and  —65535 
are  valid  numeric  data.  The  number 
65,535  is  invalid  because  it  includes 
a  comma. 

The  allowable  range  for  num- 
bers in  Apple  SpeedCalc  is  the  same 
as  for  Applesoft,  roughly  —  1.7E38 
to  +1.7E38.  If  a  calculation  pro- 
duces a  number  outside  the  allow- 
able range,  you'll  see  the  message 
*ERROR*  in  the  cell  containing  the 
formula.  This  doesn't  happen  very 
often,  since  SpeedCalc  won't  let 
you  enter  a  number  more  than  36 
digits  long,  and  there's  rarely  a 
need  to  use  such  large  numbers 
unless  you're  tracking  the  national 
debt. 

Although  an  input  value  can 
be  up  to  36  digits  long,  numbers  in 
SpeedCalc  calculations  are  accurate 
only  to  nine  digits.  This  must  be 
taken  into  account  when  doing  any 
calculation  involving  large  values. 
For  example,  you  can  enter  the  val- 
ue 1122334455.66  into  a  cell,  and 
the  cell  holds  the  value  with  no 
rounding.  However,  if  you  use  the 
value  from  that  cell  in  a  formula, 
the  value  is  rounded  to  nine  dig- 
its—1122334460.00— and  the  re- 
sult of  the  calculation  is  accurate 
only  for  the  first  nine  digits. 

You  can  enter  values  in  scien- 
tific notation  by  following  a  num- 
ber with  the  letter  E  and  the 
appropriate  power  of  10.  For  ex- 
ample, you  can  enter  1,234,000  as 
1 .234E06.  However,  SpeedCalc  nev- 
er uses  scientific  notation  itself,  no 
matter  how  big  the  number  you 
enter.  Scientific  notation  should 
generally  be  avoided,  since  values 
outside  the  Apple's  maximum 
range  will  crash  the  program.  (Press 
CTRL-RESET  to  recover.) 

For  example,   let's   enter  the 


number  123  in  cell  AAl.  No  special 
commands  are  required  to  enter 
data:  Just  move  the  cursor  to  AAl 
and  begin  typing.  The  blinking  in- 
verse <  symbol  shows  the  end  of 
the  data.  While  you're  entering  the 
number,  it  appears  only  in  the  input 
buffer  near  the  top  of  the  screen 
(the  blinking  underline  shows  your 
cursor  position).  As  soon  as  you 
press  RETURN,  the  number  ap- 
pears in  AAl  and  the  letter  N  ap- 
pears at  the  upper  right  of  the 
screen.  The  N  signifies  numeric, 
meaning  that  SpeedCalc  has  accept- 
ed the  entry  as  valid  numeric  data. 
Move  the  cursor  to  a  vacant  cell, 
then  move  it  back  to  AAl.  The  in- 
put buffer  displays  whatever  data  is 
found  in  the  cell  under  the  cursor. 
When  the  current  cell  is  empty,  the 
buffer  is  empty  as  well. 

If  you  want  to  change  anything 
during  data  entry,  press  the  ESC 
key.  ESC  always  deletes  the  charac- 
ter before  the  cursor  (or  has  no 
effect  if  the  cell  is  empty).  Later  on, 
we'll  explain  how  to  edit  existing 
data.  Use  ESC  carefully;  remember 
that  when  you're  not  editing  (when 
the  cursor  is  not  blinking),  ESC  acts 
as  an  Open  Apple  toggle.  On  the 
Apple  lie  and  lie,  you  can  (and 
should)  use  DELETE  instead  of 
ESC. 

As  you've  seen,  pressing  RE- 
TURN enters  a  data  item  into  the 
current  cell.  You  can  also  end  the 
input  by  pressing  a  cursor  key.  The 
data  is  entered  as  if  you  had  pressed 
RETURN,  and  the  cursor  moves  in 
the  indicated  direction.  This  feature 
is  handy  for  entering  a  lot  of  data: 
Simply  type  the  entry,  move  the 
cursor  to  the  next  cell,  enter  more 
data,  and  so  on. 

2.  Text  data  is  not  "data"  in  the 
strict  sense,  since  SpeedCalc  doesn't 
use  it  in  calculations  as  it  does  num- 
bers and  formulas.  Text  data  is 
there  only  to  help  people  under- 
stand what  the  other  data  means. 
Text  may  consist  of  comments,  ti- 
tles, column  headings,  subhead- 
ings, or  whatever  you  need  to 
interpret  the  numbers  and  formu- 
las. As  an  example,  move  the  cursor 
to  cell  AA2  (just  under  AAl)  and 
type  the  following  line. 
THIS  IS  A  PIECE  OF  TEXT  DATA. 

You  can  use  the  ESC  key  (or 
DELETE  on  the  Apple  He  and  Ik)  to 

erase  mistakes  while  you're  typing. 
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When  you  press  RETURN,  Speed- 
Calc  displays  T  (for  text)  in  the 
upper-right  corner.  In  this  example, 
the  cell  isn't  long  enough  to  accept 
all  the  text,  so  only  the  leftmost 
portion  appears  in  AA2.  But  even 
though  you  can't  see  it,  all  of  the 
text  is  there.  Move  the  cursor  to 
another  cell,  then  move  it  back  to 
AA2,  As  soon  as  you  return  to  AA2, 
SpeedCalc  displays  all  the  text  in  the 
input  buffer  area. 

3.  Formula  data  is  a  mathematical 
expression  or  formula.  It  may  be  as 
simple  as  2  +  2  or  as  complex  as 
your  imagination  (and  mathemati- 
cal prowess)  allows.  The  first  char- 
acter in  a  formula  must  always  be 
an  equal  sign  (  =  ).  If  you  omit  this 
symbol,  SpeedCalc  either  signals  an 
error  or  treats  the  data  as  text. 

The  true  power  of  a  spread- 
sheet is  that  a  formula  in  one  cell 
can  refer  to  another  cell.  This  is 
easier  to  demonstrate  than  to  ex- 
plain. Move  the  cursor  to  cell  AA3 
and  type  the  following  line: 

=  AA1*25.0H-@SQR(4) 

As  soon  as  you  press  RETURN, 
SpeedCalc  displays  F  {for  formula) 
in  the  upper-right  corner  and  puts 
the  result  of  the  formula  (not  the 
formula  itself)  in  AA3.  If  AAl  con- 
tains 123,  the  value  3078.23  ap- 
pears in  AA3.  In  plain  English,  this 
formula  means  "multiply  the  con- 
tents of  cell  AAl  by  25.01  and  add 
the  square  root  of  4."  Before  we 
examine  the  formula  more  closely, 
here's  a  quick  demonstration  of 
what  makes  a  spreadsheet  such  a 
powerful  tool.  Move  the  cursor 
back  to  AAl  and  press  CTRL-R. 
The  command  line  displays  the 
message  RECALCULATION  IS 
ON,  meaning  SpeedCalc  now  auto- 
matically recalculates  the  entire 
sheet  whenever  you  make  a 
change.  Now  change  the  number  in 
AAl  to  456  (simply  move  to  the  cell 
and  start  typing).  The  new  result 
(11406.56)  automatically  appears  in 
cell  AA3.  We'll  explain  more  about 
automatic  recalculation  later. 

Note  that  the  referenced  cell 
must  contain  data  that  SpeedCalc 
can  evaluate;  a  number  or  another 
formula.  If  the  formula  refers  to  an 
empty  cell,  or  one  that  contains 
text,  SpeedCalc  signals  the  error  by 
printing  *ERROR*  in  the  cell  con- 
taining the  incorrect  formula. 
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Mathematical  Operators 

These  symbols  can  be  used  as  oper- 
ators in  a  formula: 


Operator 

Function 

+ 

addition 

- 

subtraction 

a 

mulliplicalion 

/ 

division 

" 

exponentiation 

= 

equality 

One  factor  that  affects  formu- 
las is  precedence,  or  the  order  in 
which  mathematical  operations  are 
performed.  In  SpeedCalc,  formula 
operators  have  the  same  prece- 
dence as  in  ordinary  math. 

The  first  operators  to  be  evalu- 
ated— those  with  the  highest  prece- 
dence— are  those  enclosed  in 
parentheses.  Where  one  set  of  pa- 
rentheses encloses  another,  the  ex- 
pression in  the  innermost  set  is 
evaluated  first.  The  next  operators 
to  be  evaluated  are  exponents.  Mul- 
tiplication and  division  have  equal 
precedence;  both  operations  are 
lower  than  exponentiation.  Addi- 
tion and  subtraction  have  the  low- 
est precedence  of  all.  To  take  one 
example,  SpeedCalc  evaluates  the 
formula  -=5*(8  +  3*-2)"2-10/-f 2 
as  the  value  15,  just  as  in  ordinary 
math.  Note  how  the  result  is  affect- 
ed by  the  plus  and  minus  signs 
before  the  two  2's. 

Functions 

Formulas  may  also  include  any  of 
the  functions  listed  here: 


@ABS(  ) 

absolute  value 

@ATN(  ) 

arctangent 

@AVE(  ) 

average  of  a  block  of  cells 

@COS(  ) 

cosine 

@EXP(  ) 

natural  exponent 

@INT(  ) 

integer 

@LOG(  ) 

natural  logarithm 

@5GN(  ) 

sign 

@SIN(  ) 

sine 

@SQR(  ) 

square  root 

@SUM(  ) 

sum  of  a  block  of  cells 

@TAN(  ) 

tangent 

PI 

value  of  pi  (3.14159265) 

All  the  functions  except  PI  be- 
gin with  the  @  symbol  and  are 
followed  by  parentheses.  The  pa- 
rentheses of  a  function  may  contain 
a  number  or  formula.  For  example, 
the  formula  =@SQR(4)  generates 
the  square  root  of  4.  The  formula 
=  @SQR(AA1)  returns  the  square 
root  of  whatever  value  cell  AAl 
contains.  Note  that  the  argument 
(value  within  parentheses)  of  the 
functions   @TAN(),    (5)SIN()   and 


@COS( )  must  be  expressed  in  radi- 
ans; the  result  of  the  function 
@ARC( )  is  expressed  in  radians. 
The  function  @INT( )  generates  an 
integer  (whole  number)  by  truncat- 
ing (discarding  the  fractional  part 
of)  a  numeric  value;  note  that  this  is 
different  from  rounding. 

The  function  @AVE( )  calcu- 
lates the  mean  average  of  the  val- 
ues in  a  block  (group)  of  cells.  The 
function  @SUM( )  calculates  the 
sum  of  a  block.  Both  functions  re- 
quire you  to  define  the  block  so 
SpeedCalc  knows  which  cells  to  in- 
clude in  the  calculation.  This  is 
done  by  putting  two  cell  names 
separated  by  a  colon  in  the  paren- 
theses. The  first  cell  name  defines 
the  upper-left  comer  of  the  block, 
and  the  second  defines  the  bottom- 
right  corner.  For  instance, 
@AVE{AA1:AD20)  calculates  the 
average  of  all  the  cells  from  AAl  to 
AD20.  The  function  (a)SUM 
(AA1:AD20)  calculates  the  sum  of 
AAl  through  AD20,  and  so  on.  An 
error  results  if  any  cell  in  the  block 
is  blank  or  contains  text  data. 

Editing  The  Sheet 

Editing  is  a  very  important  spread- 
sheet function.  The  simplest  way  to 
change  what  a  cell  contains  is  to 
move  to  it  and  start  typing.  The  old 
data  in  that  cell  is  replaced  by  what- 
ever you  enter.  For  instance,  to  re- 
place the  contents  of  cell  AAl  with 
the  number  456,  move  to  that  cell, 
type  456,  and  press  RETURN  or  exit 
with  a  cursor  key.  Press  CTRL-B 
(think  of  blank)  to  erase  what's  in 
the  current  cell.  To  erase  everything 
in  the  sheet,  press  CTRL-N  (think 
of  new).  Before  carrying  out  this 
drastic  operation,  SpeedCalc  asks 
you  to  confirm  it  by  pressing  Y  or  N. 

In  some  cases,  only  a  minor 
change  is  needed.  Edit  mode  lets 
you  change  the  data  in  a  cell  with- 
out retyping  the  entire  entry.  To 
activate  edit  mode,  move  to  the  de- 
sired cell  and  press  CTRL-E.  In  this 
mode,  up  and  down  cursor  move- 
ment is  disabled,  and  the  left/right 
cursor  keys  move  within  the  input 
buffer.  Erase  unwanted  characters 
with  the  ESC  key  (or  the  DELETE 
key  on  the  Apple  He  and  lie).  Typ- 
ing in  edit  mode  inserts  new  char- 
acters in  the  line:  Everything  to  the 
right  of  the  new  character  moves 
right  one  space  (unless  the  buffer  is 
already  full).  Since  the  cursor  keys 


have  a  different  function  in  edit 
mode,  you  cannot  use  them  to  end 
the  input.  Press  RETURN  to  enter 
the  new  data  and  escape  from  edit 
mode. 

SpeedCalc  displays  *ERROR* 
in  a  cell  when  you  enter  an  errone- 
ous formula.  Usually  this  means 
you've  made  a  typing  error  in  that 
cell,  or  the  formula  refers  to  text  or 
an  empty  cell.  A  line  of  asterisks 
(****•****)  signals  that  a  number  is 
too  large  to  be  printed  in  the  cell. 
Though  these  messages  appear  in 
the  cell  area,  no  data  is  lost.  You 
may  move  to  the  affected  cell,  view 
its  contents  in  the  input  buffer,  and 
make  whatever  correction  is 
needed. 

Recalculation 

This  feature  is  the  very  core  of  a 
spreadsheet.  As  you  know,  entering 
or  editing  a  piece  of  data  makes 
SpeedCalc  perform  a  calculation  and 
put  the  result  in  the  cell  under  the 
cursor.  In  most  cases,  the  new  data 
relates  to  data  in  other  cells,  so 
you'll  ultimately  want  to  recalcu- 
late the  entire  spreadsheet  as  well. 
This  can  be  done  manually  or 
automatically. 

To  recalculate  the  spreadsheet 
manually,  enter  an  exclamation 
point  (SHIFT-1).  SpeedCalc  begins 
at  AAl  and  recalculates  every  cell 
that  contains  data,  placing  fresh  re- 
sults wherever  needed.  If  you 
switch  to  automatic  recalculation 
mode,  SpeedCalc  automatically  re- 
calculates the  entire  spreadsheet 
each  time  you  enter  new  data  or 
edit  what  exists.  When  you  press 
CTRL-R,  SpeedCalc  changes  the  re- 
calculation status  and  displays  it  at 
the  top  of  the  screen.  If  automatic 
recalculation  was  turned  off  before, 
it  is  now  on  {and  vice  versa).  If  you 
aren't  sure  which  mode  you're  in, 
press  Open  Apple-CTRL-R;  Speed- 
Calc displays  the  mode  vrithout 
changing  it. 

Automatic  recalculation  can  be 
fun  to  watch  in  a  large  spreadsheet: 
Every  time  you  make  a  change, 
new  results  appear  everywhere  on 
the  screen.  However,  the  more  data 
your  spreadsheet  contains,  the 
longer  it  takes  to  update  the  entire 
sheet.  For  this  reason,  you  may 
want  to  turn  off  automatic  recalcu- 
lation most  of  the  time,  recalculat- 
ing manually  whenever  you  need 
to  view  results. 


One  problem  vrfth  recalcula- 
tion arises  from  the  order  in  which 
cells  are  calculated.  Because  only 
one  cell  can  be  calculated  at  a  time, 
you  must  sometimes  recalculate  the 
entire  spreadsheet  two  or  three 
times  to  get  correct  results  in  every 
cell  (this  is  common  to  all  spread- 
sheet programs).  For  instance,  say 
you  have  a  formula  in  AAl  which 
refers  to  a  formula  in  AB15.  When 
SpeedCalc  calculates  AAl,  it  must 
use  the  existing  data  from  AS  15 — 
which  is  probably  out  of  date,  since 
the  formula  in  AB15  hasn't  been 
recalculated  yet.  To  avoid  this  prob- 
lem, you  should  always  recalculate 
a  sheet  manually  two  or  three  times 
before  printing  or  saving  it  to  disk. 

SpeedCalc  offers  a  number  of 
other  features.  Before  experiment- 
ing with  them,  you  should  spend 
some  time  typing  in  a  hypothetical 
spreadsheet — perhaps  a  fictitious 
yearly  budget — to  become  thor- 
oughly familiar  with  the  basic  com- 
mands covered  so  far.  Most 
importantly,  create  formulas  using 
all  the  operators  in  different  combi- 
nations. Try  doing  things  that  you 
know  will  cause  errors.  Then  cor- 
rect the  errors  in  edit  mode,  and  so 
on.  It  takes  a  thorough  grasp  of  the 
fundamentals  to  get  the  most  out  of 
SpeedCalc's  advanced  features. 

Change  Format 

The  default  (normal)  format  for  nu- 
meric data  is  flush  right  with 
rounding  to  two  decimal  places.  In 
other  words,  the  number  is  dis- 
played in  the  rightmost  part  of  the 
cell,  with  two  numbers  after  the 
decimal  point.  Text  and  formulas 
are  also  displayed  flush  right. 
SpeedCalc  offers  several  commands 
for  changing  cell  formats.  (Apple  11 
and  II  +  owners  who  are  using  the 
ESC  toggle  in  place  of  the  Open 
Apple  key  should  be  careful  that 
ESC  is  not  in  effect  when  it's  not 
desired;  accidental  global  changes 
may  be  difficult  to  reverse.) 

Change  Format  (CTRL-F).  This 
command  changes  the  location  of 
data  in  the  cell.  When  you  press 
CTRL-F,  the  SpeedCalc  command 
line  displays  the  question  FOR- 
MAT: LEFT,  CENTER,  OR  RIGHT 
JUSTIFY?.  Press  L,  C,  or  R  to  move 
the  data  to  the  left,  center,  or  right 
of  the  cell. 

Change  Decimal  Places  (#).  Speed- 
Calc also  lets  you  change  the  num- 


ber of  decimal  places  for  any  cell. 
The  default  number  of  decimal 
places  is  2,  but  you  may  change  it  to 
anything  from  0-15.  Press  # 
(SHIFT-3)  to  change  this  value: 
SpeedCalc  prompts  you  to  enter  a 
number  from  0-15.  If  you  choose 
zero  decimal  places,  any  number  in 
that  cell  is  rounded  off  to  the  near- 
est integer  (whole  number).  If  you 
choose  15,  a  number  in  that  cell  is 
not  rounded  off  at  all — SpeedCalc 
displays  it  exactly  as  you  entered  it 
or  as  it  was  calculated  from  a 
formula. 

Width  (CTRL-W).  The  width  com- 
mand changes  the  width  of  an  en- 
tire column  of  cells.  Move  the 
cursor  to  any  cell  in  the  desired 
column,  then  press  CTRL-W.  When 
SpeedCalc  ■  displays  the  prompt 
WIDTH:,  respond  with  a  number 
from  4-36,  The  entire  screen  is  re- 
drawn to  accommodate  the  new 
format,  and  may  look  very  different 
depending  on  what  value  you 
chose.  For  instance,  if  you  increase 
a  column's  width,  the  rightmost 
column  of  the  former  display  may 
disappear:  SpeedCalc  only  displays 
as  many  complete  columns  as  it  can 
fit  on  the  screen.  If  you  decrease  the 
width  of  a  column,  you  may  see 
asterisks  where  numbers  used  to  be 
(indicating  the  cell  is  now  too  small 
to  display  the  entire  number).  To 
get  rid  of  the  asterisks,  expand  the 
column  as  necessary. 

Global  Format  (Open  Apple- 
CTRL-F).  This  is  the  same  as  the 
ordinary  format  command,  but  op- 
erates globally,  changing  every  cell 
in  the  sheet  instead  of  just  one. 

Global  Width  (Open  Apple- 
CTRL-W).  This  is  a  global  version 
of  the  width  command.  Every  col- 
umn in  the  sheet  changes  to  the 

designated  width. 

Macro  Editing 

After  typing  in  a  large  spreadsheet, 
you  may  decide  to  make  a  major 
change.  You  may  want  to  add  new 
data  somewhere  in  the  middle,  de- 
lete a  section,  or  move  a  group  of 
cells  from  one  location  to  another. 
SpeedCalc's  macro  (large-scale) 
editing  commands  simplify  such 
operations,  affecting  an  entire  block 
of  cells  at  once.  A  block  is  simply  a 
group  of  cells  connected  in  rectan- 
gular fashion.  You  can  define  it  as  a 
single  cell,  a  row  or  column,  or  any 
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rectangular  area  within  the  spread- 
sheet. 

There  are  two  ways  macro 
commands  work:  verbatim  or  rela- 
tive. To  take  a  simple  example,  say 
that  cell  AA2  contains  the  formula 
=AA1*5  and  you  want  to  move  its 
contents  to  cell  AB2.  When  this  is 
done  in  verbatim  mode,  AB2  con- 
tains an  exact  copy  of  what  was  in 
AA2  (=AA1*5).  Note  that  the  cell 
name  used  in  the  formula  does  not 
change:  The  formula  still  refers  to 
AAl .  If  you  perform  the  same  oper- 
ation in  relative  mode,  the  cell 
name  in  the  formula  is  adjusted  to 
fit  the  new  location.  In  this  case, 
AB2  would  contain  the  formula 
=  AB1*5.  (Apple  II  and  IH-  owners 
who  are  using  the  ESC  toggle  in 
place  of  the  Open  Apple  key  should 
be  careful  that  the  toggle  is  not  in 
effect  when  not  desired;  accidental 
relative  changes  can  lead  to  prob- 
lems that  are  difficult  to  detect  and 
correct.) 

Copy  (CTRL-C).  The  copy  com- 
mand copies  a  block  of  cells  into  a 
different  location  without  disturb- 
ing the  original  cells.  Place  the  cur- 
sor on  the  upper-left  comer  of  the 
block  you  want  to  copy,  then  press 
CTRL-C.  SpeedCak  prompts  you  to 
move  the  cursor  to  the  lower-right 
comer  of  the  block  you  want  to 
copy.  Once  the  cursor  is  in  place, 
press  RETURN.  Now  SpeedCak 
prompts  you  to  move  the  cursor  to 
the  place  where  you  want  to  put  the 
block:  This  is  the  upper-left  comer 
of  the  new  position.  Once  the  cur- 
sor is  there,  press  RETURN  again. 
The  new  data  replaces  whatever 
was  contained  in  the  designated 
cells.  Note  that  if  you  define  an 
impossible  block  (for  instance, 
moving  the  cursor  to  the  upper-left 
of  the  original  position,  rather  than 
below  and  to  the  right),  SpeedCak 
does  not  copy  any  data.  This  pro- 
vides a  way  to  cancel  the  command 
if  you  press  CTRL-C  accidentally. 

Move  (CTRL-M).  This  command 
works  like  a  copy,  but  it  fills  the 
original  cells  with  blanks.  Though 
SpeedCak  has  no  express  insert 
command,  you  can  use  this  com- 
mand to  make  space  for  new  data  in 
the  middle  of  a  spreadsheet.  Simply 
move  everything  below  the  inser- 
tion point  down  as  far  as  you  need. 
Because  RETURN  generates 
the  same  character  code  as  CTRL- 
M,  you  may  find  when  you  first 
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begin  using  SpeedCak  that  you  acci- 
dentally invoke  the  move  function 
by  pressing  RETURN  when  you 
shouldn't  have.  To  cancel  this,  sim- 
ply press  RETURN  twice  more 
without  moving  the  cursor. 

Relative  Copy  (Open  Apple- 
CTRL-C).  This  form  of  the  copy 
command  adjusts  the  cell  names 
used  in  formulas  within  the  copied 
block  (see  explanation  above). 

Relative  Move  (Open  Apple- 
CTRL-M).  This  is  the  relative  form 
of  the  move  command.  Cell  names 
in  formulas  are  adjusted  to  reflect 
the  move. 

Memory  Management 

The  DOS  3.3  version  of  SpeedCak 
makes  about  12K  (over  12,000 
characters)  of  memory  available  for 
data;  the  ProDOS  version  provides 
approximately  17K.  As  noted  earli- 
er, SpeedCak  lets  you  spread  your 
data  out  over  a  much  larger  number 
of  cells  than  you  can  actually  fill 
with  data.  The  extra  space  is  pro- 
vided to  give  you  full  control  over 
the  final  format  of  the  spreadsheet 
and  to  leave  some  elbow  room  for 
move  and  copy  operations. 

Because    memory   is   limited, 
you  should  keep  careful  track  of 


how  much  is  free  while  using  the 
program.  Press  CTRL-A  to  display 
the  amount  of  free  memory.  We 
suggest  limiting  your  spreadsheets 
to  1,600  cells  (equivalent  to  40  rows 
by  40  columns)  when  using  the 
DOS  3.3  version,  or  2,500  cells  (a 
50  X  50  worksheet)  when  using  the 
ProDOS  version.  If  you've  filled 
nearly  all  of  free  memory,  you  may 
have  to  break  the  spreadsheet  into 
two  smaller  sheets. 

Although  SpeedCak  checks  the 
amount  of  available  memory  and 
displays  an  error  message  if  you 
run  out,  you  should  be  careful  not 
to  exhaust  free  memory.  Any  move 
or  copy  operation  in  process  will  be 
aborted  if  sufficient  memory  is  not 
available. 

Disk  Operations 

SpeedCak  has  three  disk  commands 
which  allow  you  to  save  a  spread- 
sheet to  disk,  load  it,  and  display 
the  disk  directory.  The  directory 
command  is  the  simplest  to  use: 
Simply  press  CTRL-D.  The  spread- 
sheet disappears  and  a  directory  of 
the  disk  in  drive  1  is  displayed. 
Press  RETURN  to  rehjm  to  the 
spreadsheet. 

To  save  a  spreadsheet  to  disk, 
I  press   CTRL-S.   SpeedCak  prints 


SpeedCalc  Commands 


Command 

CTRL-A 

CTRL-B 

CTRL-C 

CTRL-D 

CTRL-E 

CTRL-F 

CTRL-G 

CTRL-L 

CTRL-M 

CTRL-N 

CTRL-P 

CTRL-R 

CTRL-S 

CTRL-W 

CTRL-X 

CTRL-@ 

Open  Apple-CTRL-C 

Open  Apple-CTRL-M 

Open  Apple-CTRL-P 

Open  Apple-CTRL-R 

Open  Apple-CTRL-W 

I  (SHIFT-1) 

#  (SHIFT-3) 


Action 

available  memory  check 

blank  (erase)  current  cell 

copy  block  verbatim 

disk  directory 

edit  current  cell 

change  cell  format 

goto  selected  cell 

load  SpeedCalc  file 

move  block  verbatim 

new  (erase  entire  sheet) 

print  file  on  printer 

turn  recalculation  on/off 

save  SpeedCalc  file 

change  column  width 

exit  SpeedCalc 

home  cursor 

copy  block  relative 

move  block  relative 

print  to  screen,  disk,  or  printer 

check  recalculation  status 

change  width  of  all  columns 

recalculate  sheet 

change  decimal  places 


Note:  The  Apple  II  and  n+  have  no  Open  Apple  key,  so  ESC  must  be 
used  as  an  Open  Apple  toggle,  Pressing  ESC  once  makes  all  following 
keypresses  behave  as  if  Open  Apple  were  pressed.  Press  ESC  again  to 
turn  off  the  Open  Apple  toggle. 


SAVE:  on  the  command  line,  fol- 
lowed by  an  underline  cursor.  Enter 
a  valid  Apple  filename  and  press 
RETURN.  (If  you  change  your  mind 
and  decide  not  to  save  anything, 
press  RETURN  without  typing  a 
filename.)  If  no  disk  error  occurs 
while  the  spreadsheet  is  being 
saved,  SpeedCalc  displays  NO  ER- 
RORS in  the  command  line  and 
returns  you  to  command  mode.  If 
there  was  an  error,  you'll  hear  a 
beep  and  see  the  message  I/O  ER- 
ROR in  the  command  line. 

To  load  a  saved  file  from  disk, 
press  CTRL-L.  Again,  you  can  can- 
cel the  operation  by  pressing  RE- 
TURN without  entering  a  filename. 
SpeedCalc  prompts  you  to  enter  the 
filename  and  displays  the  error  sta- 
tus when  the  operation  is  complete. 

When  saving  or  loading  Speed- 
Calc files  with  ProDOS,  you  must 
specify  the  prefix  along  with  the 
name.  If  you  don't  want  to  type  the 
prefix  every  time  you  enter  a  file- 
name, simply  call  up  a  directory  for 
the  disk  you  want  to  use  to  save  or 
load.  This  automatically  sets  the 
prefix  to  match  the  current  disk, 
relieving  you  of  the  need  to  enter  it 
with  every  name. 

Printing 

SpeedCalc  lets  you  print  data  to 
three  different  devices:  to  the 
screen  for  previewing  output,  to  a 
printer  for  permanent  documenta- 
tion, or  to  a  disk  file  for  integrating 
the  data  with  a  SpeedScript  docu- 
ment. 

To  print  a  hardcopy  of  the 
spreadsheet  to  a  printer  in  slot 
number  1,  press  CTRL-P.  Before 
using  this  command,  you  must  posi- 
tion the  cursor  beloio  and  to  the  right 
of  the  block  of  cells  you  wish  to  print. 
The  upper-left  comer  of  the  print- 
out starts  at  cell  AAl. 

To  send  output  to  a  printer 
with  a  slot  number  other  than  1,  or 
to  the  screen  or  a  disk,  first  position 
the  cursor  in  the  lower-right  comer 
of  the  block  you  want  to  print.  Then 
press  Open  Apple-CTRL-P  (toggle 
ESC  on  the  Apple  11  and  IH-). 
SpeedCalc  asks  if  you  want  to  print 
to  the  screen,  to  disk,  or  to  the 
printer.  Press  S  to  preview  output 
on  the  screen,  D  to  print  to  disk,  or 
P  to  select  printer  output.  Pressing 
any  other  key  cancels  the 
command. 

If  you  select  the  P  option  after 


pressing  Open  Apple-CTRL-P, 
SpeedCalc  asks  you  specify  a  slot 
number  by  pressing  one  of  the 
number  keys  from  1-7.  This  per- 
mits you  to  use  a  printer  in  any  of 
those  slots.  If  you  change  your 
mind  at  any  point  during  this  pro- 
cess, press  RETURN  without  enter- 
ing anything;  SpeedCalc  returns  you 
to  command  mode. 

You  can  also  print  SpeedCalc 
data  to  a  disk  file  for  use  in  a  Speed- 
Script  document.  Select  the  D  op- 
tion after  pressing  Open  Apple- 
CTRL-P,  then  enter  a  filename.  The 
data  is  saved  as  a  disk  file  of  that 
name.  Note  that  printing  to  disk 
creates  a  different  type  of  file  than 
saving  to  disk,  and  SpeedCalc  can- 
not reload  files  in  the  print  format. 
You  should  save  files  you  wish  to 
reload  into  SpeedCalc,  and  print 
files  you  wish  to  convert  for  Speed- 
Script.  Unlike  the  SpeedCalc  save 
and  load  commands,  no  error  mes- 
sages are  provided  if  the  spread- 
sheet cannot  be  printed  to  disk. 
Thus,  you  must  ensure  that  the 
drive  contains  a  write-enabled  disk 
with  sufficient  space  to  hold  the 
printed  spreadsheet  before  you  at- 
tempt to  print  to  disk. 

SpeedScript  File 
Converter 

SpeedCalc  sends  data  to  the  printer 
in  simple,  plain  vanilla  form.  That 
may  be  fine  for  personal  use,  but  if 
you're  creating  a  document  for  oth- 
ers to  view,  you  may  want  special 
features  such  as  boldface,  underlin- 
ing, etc.  Since  Apple  SpeedScript — 
COMPUTEi's  popular  word  proces- 
sor— already  offers  a  way  to  access 
these  features  (and  many  more),  no 
attempt  has  been  made  to  include 
them  in  SpeedCalc.  All  that's 
needed  is  a  simple  program  to  con- 
vert SpeedCalc  files  into  a  form  that 
SpeedScript  can  load.  Then  you  can 
edit  the  file  with  SpeedScript  as  you 
would  any  other  document — in- 
serting printer  control  codes,  refor- 
matting the  text,  merging  it  with 
other  text,  and  so  on.  The  "Speed- 
Script  File  Converter"  program 
published  in  the  same  issue  as 
SpeedScript  makes  it  easy  to  per- 
form the  conversion.  Here  are  the 
steps  to  follow  to  convert  a  Speed- 
Calc file  for  SpeedScript: 

1.  After  creating  a  spreadsheet  with 
SpeedCalc,  print  it  to  disk  as  de- 
scribed above. 


2.  Exit  SpeedCalc,  then  load  and  run 
SpeedScript  File  Converter.  The  pro- 
gram prompts  you  to  enter  the 
name  of  the  SpeedCalc  file  you 
printed  to  disk.  Then  it  asks  you  to 
enter  the  name  of  the  SpeedScript 
file  you  want  to  create  (of  course, 
this  name  should  be  different  from 
the  first).  The  File  Converter  then 
constructs  a  SpeedScripf-loadable 
disk  file  from  the  SpeedCalc  file. 

3,  After  the  File  Converter  is  fin- 
ished, load  and  BRUN  SpeedScript, 
then  load  the  new  SpeedScript  file 
as  you  would  any  SpeedScript  docu- 
ment. The  data  appears  on  the 
screen,  ready  to  be  edited  in  any 
way  you  wish.  © 


Program  1 :  Apple  Speed- 
Calc For  DOS  3.3 

Please  refer  1o  the  "MIX"  article  In  this  Issue 
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20 

27 

20 

A5 

IB 

18 

1C6A: 

85 

IB 

90 

02 

E6 

IC 

1C72: 

AS 

IE 

C9 

C9 

DO 

B2 

1C7A: 

85 

IE 

E6 

ID 

A5 

ID 

1CB2! 

DO 

A6 

AD 

30 

25 

85 

ICBA: 

31 

25 

85 

IE 

38 

20 

1C92! 

4C 

7C 

09 

20 

33 

IE 

24 

85 

77 

16 

AS 

FC 

20 

9S 

92 

IB 

CB 

IB 

IB 

IB 

FO 

69 

00 

46 

DO 

Dl 

D9 

6B 

as 

4C 

00 

Bl 

48 

FB 

E6 

BA 

FO 

FO 

56 

lA 

A9 

61 

20 

72 

EE 

A2 

01 

2E 

03 

4C 

FO 

FF 

DO 

9D 

DO 

59 

F8 

85 

6F 

63 

32 

20 

5B 

DO 

F7 

Bl 

18 

85 

9E 

20 

79 

BB 

79 

IB 

FC 

lA 

AS 

89 

IC 

AO 

FD 

CB 

DO 

23 

70 

90 

64 

4C 

CD 

EB 

AO 

DA 

02 

DO 

OB 

5F 

09 

60 

61 

24 

B5 

9A 

80 

FE 

38 

AA 

BE 

03 

09 

80 

D4 

E8 

68 

7D 

FD 

60 

BA 

BB 

BS 

74 

BD 

BS 

F7 

A9 

06 

84 

AO 

99 

B3 

00 

B9 

77 

99 

75 

7A 

BD 

C4 

29 

20 

60 

DA 

B5 

60 

71 

60 

IB 

55 

A9 

00 

80 

BD 

CB 

EC 

CS 

BC 

9C 

60 

BD 

C8 

A9 

03 

63 

BC 

B5 

2D 

D6 

03 

AF 

98 

4B 

45 

B5 

A9 

OE 

IB 

A2 

OB 

B5 

FO 

5S 

CS 

BS 

DA 

C5 

B5 

D3 

AB 

AD 

52 

20 

34 

D9 

8D 

CI 

IE 

20 

60 

CC 

A9 

23 

AA 

20 

54 

D7 

DO 

F9 

A6 

4C 

7C 

4B 

60 

A9 

B7 

AS 

ID 

36 

31 

25 

CA 

AD 

EF 

D9 

85 

IC 

4B 

85 

lA 

5C 

19 

29 

CI 

20 

C7 

CD 

Bi 

19 

EF 

9D 

OU 

B2 

DO 

F4 

BB 

2C 

25 

EA 

69 

02 

EO 

E6 

IE 

Fl 

A9 

01 

80 

C9 

33 

14 

ID 

AD 

AC 

C7 

IF 

28 

IB 

20 

95 

1C9A: 
1CA2: 
ICAA: 
1CB2: 
ICBA: 
1CC2: 
ICCA: 
ICDZ: 
ICDA: 
1CE2S 
ICEA: 
1CF2: 
ICFA: 
1D02! 
IDOA: 
1D12: 
IDIA: 
1D22: 
1D2A: 
1D32! 
1D3A: 
1D42S 
1D4A: 
1D52: 
1D5A: 
1D62: 
1D6A: 
lD72s 
1D7A: 
1082: 
IDBA: 
1D921 
1D9A: 
1DA2: 
IDAA: 
1DB2: 
IDEA: 
1DC21 
IDCA: 
1DD2: 
IDDA: 
1DE2: 
IDEA: 
1DF2: 
IDFA: 
1E02: 
lEOA: 
IE12: 
lElAi 
1E22: 
1E2A: 
1E32: 
1E3A! 
1E42! 
1E4A: 
ie52: 
1E5A: 
1E62: 
1E6A: 
!E72! 
1E7A: 
1E82: 
1E8A: 
1E92: 
IE9A; 
1EA2S 
lEAA: 
1EB2: 
lEBA: 
1EC2: 
lECA: 
1ED2: 
lEDA: 
1EE2: 
lEEA: 
1EF2: 
lEFA: 
1F02: 
IFOAi 
lFI2s 
IFIA: 
1F22: 
1F2A: 
1F32: 
1F3A; 
1F42: 
1F4A: 


C7  IF 
91  IB 
AO  86 

59  25 
58  25 
FF  80 

00  FO 

60  A9 
FD  60 
CE  6A 
C9  3D 
C4  08 

01  4C 
25  BO 
ai  OC 

00  FO 

18  20 
22  BD 
00  Bl 
20  27 
36  25 

02  C9 
02  8D 
38  E9 
00  02 
FO  06 
8D  29 
FO  4C 
02  C9 
FO  F4 
25  AD 
8D  29 
00  02 
45  FO 
EE  A9 
02  CB 
00  02 
25  A2 
E8  C9 
06  99 
00  99 
02  AE 
02  CA 
25  CB 
FO  04 
25  60 
29  A9 
Fl  24 

24  ES 
F2  E2 
FC  A9 
60  AO 
00  91 
29  03 

19  AB 
Bl  19 
76  IE 
lA  8D 
IE  AS 
EB  AO 

FF  ce 

7A  IE 

E5  FB 

85  70 

FO  24 

FO  22 

8D  29 

OD  29 

3B  ES 

E9  00 

DO  D4 

6C  DO 

20  3E 
DO  03 
AD  39 
85  IE 

25  BD 
2D  25 
4C  4D 
25  A5 
25  8D 
3D  25 
68  E9 
02  BO 
Bl  00 
C9  IB 
33  BO 


A9  00 
20  03 

20  3E 
30  03 
30  OB 
B3  22 
06  A9 
C6  20 
EE  6A 
22  AD 
FO  27 
FO  OS 

17  ID 
33  AO 
20  B7 
02  A9 
C7  IF 
2D  25 

19  29 

20  20 
CA  CA 
45  DO 
3B  25 
30  BD 
3B  E9 

18  69 
25  AD 
A2  00 
45  FO 
CS  DO 

29  25 
25  A2 
E8  C9 
06  99 

30  AE 
CA  DO 
BC  36 
00  AO 


2E 
BO 


SO  02 
29  25 
DO  FA 
BD  BO 
EB  ca 

20  6F 


AS  91 
IC  60 
09  A9 
AD  61 
AD  B3 
AD  B3 
CE  20 
ED  FD 
22  20 
00  03 
AE  C4 
CA  DO 
AD  2C 
00  A9 

00  DO 

02  BD 
BO  09 
4C  32 
FC  BD 

03  IC 
CA  CA 
7B  EB 
E8  BD 
2A  25 
30  AE 
OA  CA 
3B  25 
AO  00 

08  E8 
Fl  SB 
38  ED 

01  AO 
2E  FO 
00  02 
29  25 
F9  A9 
25  60 
00  BD 
Fa  C9 
C8  DC 
A9  2E 
A9  30 
A2  00 

02  99 
DO  F4 

09  A9 


00  85  28  B5 


3B  ES 
70  20 
20  34 

00  S5 

01  Bl 
IB  BS 
C9  02 
Bl  19 
B5  FB 


AS 
7A 


70  3B 
00  B9 
DO  F7 
CA  DO 
85  6F 
AD  EF 
85  FE 
38  BB 
25  CS 
25  90 
FB  91 
91  FD 
E6  FE 
CB  60 
09  20 
4C  00 
25  BS 
IB  20 
2B  25 
AD  3C 
22  48 
IE  BD 
3B  25 
AD  2C 
41  30 
B5  A9 
E9  40 
BO  A4 
9D  85 


6F  AB 
21  IE 
ED  A9 
FB  20 
IB  FO 
91  IB 
DO  09 
4C  54 
18  65 
SD  79 
69  00 
ED  77 
FF  FF 
EE  77 
EE  A5 
AS  70 

24  as 

AO  01 
Bl  FD 

Bl  FD 

OF  sa 

FD  CB 
C8  FO 
CB  A5 
A9  23 

25  09 
C6  4C 
ID  AD 
C7  IF 
AD  3D 
25  BD 
A5  ID 
3A  25 
AD  2D 
25  8D 
BB  FO 
lA  85 
30  AA 
IB  65 
ID  20 


IB  ce  3E 

A9  23  77 
00  2C  D7 
CO  OD  98 
22  49  Ba 
22  C9  41 
ED  FD  6B 
20  ED  16 
BB  09  BA 
FO  4E  78 
OB  DD  5E 
F8  A9  63 
25  C9  AD 

03  20  38 
ES  A9  46 
2E  25  25 
AD  B4  OD 
ID  AO  CE 
2D  25  24 
60  AE  44 
BD  00  DB 
BD  00  B8 

00  02  E2 
ES  BD  77 
2A  25  70 
DO  FA  48 
C9  2D  64 
BD  00  OD 
C9  2E  85 
8C  3B  9E 
3B  25  4F 

01  BD  F6 
F8  C9  FF 
C8  DO  80 
99  00  CB 
00  99  96 
CE  29  DB 
00  02  3B 
45  FO  2B 
EE  A9  B7 
BD  00  CC 
9D  00  BA 
AC  29  3A 
00  02  2fl 
BC  36  02 

04  as  60 
24  AD  EA 
AD  F2  22 
60  20  54 

85  75 


01 

54  09  B9 
E7  A9  18 
Bl  19  3C 
CB  Bl  IB 
IE  C8  BD 
19  BD  34 
IE  A5  D3 
SD  77  IE 
IE  AA  E4 
99  FF  lA 
IE  EE  03 
6F  38  OF 
E9  00  23 
FD  AD  43 
FD  63 
19  D9 
lA  94 
FD  69 
FD  99 
03  CB  DE 
FE  C5  12 
AO  22  36 
C9  59  14 
7C  09  3B 
3A  25  B2 
AD  3B  CF 
25  BD  IF 
2C  25  76 
BD  39  80 
AD  2B  D5 
25  BD  02 
3C  25 
06  C9 
ID  20 
FO  AB  49 
ID  C9  E6 
Bl  00  27 


Bl 
ES 
ES 
Bl 
Bl 


BD 
B9 
50 


1F52: 

BO 

96 

1F5A: 

C9 

00 

IF62: 

CO 

C9 

iF6A! 

C7 

IF 

1F72! 

01 

DO 

lF7Ai 

A2 

00 

1FB2: 

Bl 

19 

IFBA: 

2C 

25 

1F92! 

02 

A5 

1F9A: 

00 

A9 

1FA2: 

B9 

68 

IFAA: 

ID 

AD 

1FB2! 

C7 

IF 

IFBA: 

AD 

3D 

1FC2: 

25 

BD 

IFCA: 

CA 

86 

lFD2t 

A9 

00 

IFDA: 

03 

18 

1FE2! 

IC 

A6 

IFEA: 

SS 

IB 

1FF2: 

06 

IB 

IFFA: 

24 

B5 

2002: 

03 

2B 

200A: 

85 

19 

2012: 

19 

29 

201A: 

29 

FC 

2022: 

BD 

2C 

202A: 

AD 

2B 

2032  J 

2C 

2S 

203A! 

6F 

91 

2042i 

B8 

AD 

204A: 

6F 

CB 

2052: 

A2 

00 

205  A: 

ES 

CC 

2062: 

20 

20 

206A: 

36 

25 

2072: 

25 

BD 

207A: 

2C 

25 

2082: 

00 

03 

20BA! 

25 

DO 

2092: 

IB 

CB 

209A: 

2B 

25 

20  A2: 

AD 

36 

20AA: 

BD 

FE 

20B2I 

36 

25 

20BA: 

2C 

25 

20C2: 

FO 

OF 

20CA: 

85 

6F 

20D2; 

60 

A9 

20  4A 

DO  8C 
BO  B4 
90  07 
03  4C 
Bl  19 
9D  00 
DO  F4 
BB  48 
02  20 
85  BB 
3A  25 
AD  3B 
25  BD 
2C  25 

IB  A9 
A2  08 
65  IC 

IE  CA 


EC  20 
CO  00 
84  IE 
AD  2B 


EA 
C9 


02  C8 
A9  00 
A5  B9 
81  OC 


AD 

as 

25 

2D 


60  03 
CB  85 
6A  66 
CA  10 


IC 
IC 


20DA! 
20E2! 
20EA: 
20F2: 
20FA: 
2102: 
210A: 
2112: 
211A: 
2122: 
212A: 
2132: 
213A: 
2142: 
214A: 
2152! 
215A: 
2162) 
216A: 
2172: 
217A! 
2182: 
21BA! 
2192: 
219A: 
21A2: 
21AA: 
21B2: 
2LBA: 
21C2: 
21CA: 
21D2: 
21DA: 
21E2: 
21EA: 
21F21 
21FA; 
2202: 


IB  A9 
AS  ID 
F5  24 
BA  BE 
BD  00 
C9  29 
ES  EC 
FO  03 
A9  00 
20  Bl 
40  C9 
45  C9 
15  C9 
07  C9 
20  OD 
48  4C 
7B  21 
03  4C 

20  F9 

21  B2 
EC  20 
C9  2B 
30  EB 
2F  FO 
C9  29 
FO  14 
19  22 
02  E6 
12  86 

22  DD 
22  A6 
22  DD 
EB  AS 
AO  48 
AS  9D 
21  FO 
FO  06 
68  20 


IC  AO 
18  60 
86  lA 
03  SD 
BD  2D 
25  38 
25  C9 
EE  ZC 
IB  C8 
2B  25 
AD  2C 
BD  00 
2C  25 
F2  20 
38  AD 
2C  25 
91  6F 
91  6F 
F4  AO 
AS  70 
OD  2D 

25  91 
01  91 
DO  F4 
90  06 
AS  6F 
A5  70 
00  A8 
24  AO 
80  F4 
A2  FD 
3E  25 
03  C9 
DO  01 
2C  25 
4C  4D 
85  BB 
00  90 
2B  FO 
50  FO 
41  FO 
40  FO 
IF  4C 
22  21 
20  Bl 
4D  22 
EA  20 
49  OF 
B7  00 
FO  35 
C9  2A 

26  EB 
FO  03 
C9  01 
4C  Al 
B9  4C 
06  68 
9B  22 
06  6B 
9B  22 
A2  48 
AS  9F 
4B  AS 
58  4C 
20  19 
34  ED 


8A 
69 
A5 

01 


AA  88 
2B  90 
2B  25 
25  CB 
60  20 

02  FO 
25  flO 
A5  70 
OD  2D 
25  91 

03  91 
DO  F4 
EE  36 
36  25 
AC  36 
A2  00 
C8  EB 
00  A5 
91  IB 
25  91 
6F  C8 
6F  C8 
AS  6F 
AS  70 
18  6D 


69 
91 


13  20 

24  AS 
9A  4C 
A2  00 
28  DO 
88  9D 
DO  EA 
22  A9 
A9  03 
51  C9 
49  C9 

25  C9 
OB  C9 
OF  4C 
7B  21 

20  OS 
00  C9 
A9  73 
Bl  00 
DA  Al 
FO  78 
EB  C9 
FO  2B 
C9  5E 
4C  4D 
FO  07 

21  E6 
7B  21 
48  AB 
90  10 
48  AB 
BO  FO 
AS  Al 
48  AS 
06  48 
69  EA 

22  4C 
AO  00 


36  09  94 
FO  8B  DO 
38  20  FE 
25  C9  05 
AO  02  9D 
FO  F3  9E 
EB  CC  65 
9D  00  lA 

48  AO  IC 
68  85  IB 
25  85  36 
18  20  71 
2B  25  EO 
AD  3C  32 
A6  ID  5C 
IC  18  BA 
IB  90  6E 
F5  as  17 
65  IB  E3 
B5  IC  9B 
6D  FO  EA 
IB  DO  10 
Bl  IB  CC 
14  Bk  23 
Bl  19  CC 
Bl  19  7E 
33  IE  64 
32  EE  74 

00  AS  C3 
91  IB  B3 
25  91  E2 

6F  ca  04 
6F  ca  Al 

4C  B6  C3 
25  EE  A4 
6D  2C  3E 
23  AD  B6 
CS  BD  A7 
CC  2C  5C 
6F  91  41 
88  AD  06 
6F  C8  45 
A2  02  EA 
EB  EC  20 
18  6D  49 
C9  A4  F3 
2C  25  DE 
85  70  2C 
C8  91  54 
3E  09  40 
IE  8D  BF 
7C  OS  6A 
AO  00  A4 

01  ca  66 
00  03  5B 
CO  00  87 
00  48  EB 
85  B9  8B 
2D  FO  E6 
2E  FO  BB 
28  FO  34 
42  FO  A5 
4D  22  F7 
A9  01  3D 
12  4C  A7 

49  FO  6C 
AO  21  82 
4C  7B  3C 
20  4A  E7 
A2  02  E2 
2D  FO  9F 
E8  C9  CA 
FO  21  C6 
22  68  9E 
48  20  FF 
B8  DO  8C 
4C  53  F7 
B9  9B  E2 
20  19  41 
B9  9B  03 
20  72  2F 
48  A5  3F 
9E  48  94 
4C  22  D6 
68  48  El 
Fa  21  22 
B9  00  60 


98     COMPUTEI      February  1986 


220  A 1 

01 

99 

00 

02 

FO 

03 

C8 

DO 

4B 

24C2: 

C5 

D2 

D2 

CF 

D2 

D3 

00 

D2 

B2 

2212: 

F5 

BC 

36 

25 

4C 

39 

ID 

68 

77 

24CA: 

C5 

C3 

CI 

CC 

C3 

D5 

CC 

CI 

BC 

221A! 

B5 

FB 

68 

B5 

FC 

68 

85 

07 

21 

24D2: 

D4 

C9 

CE 

C7 

AE 

AE 

AE 

00 

DB 

2222: 

6B 

B5 

A5 

68 

B5 

A6 

68 

85 

54 

24DA: 

CE 

CF 

D4 

AO 

CI 

AO 

D3 

DO 

2C 

222  A: 

A7 

68 

85 

A8 

6B 

85 

A9 

68 

AC 

24E2: 

C5 

C5 

C4 

C3 

CI 

CC 

C3 

AO 

BD 

22321 

B5 

AA 

45 

A2 

85 

AB 

A5 

07 

E5 

24EA: 

C6 

C9 

CC 

C5 

00 

00 

00 

00 

FE 

223  A: 

OA 

AS 

AS 

FC 

48 

A5 

FB 

48 

4B 

24F2: 

00 

00 

00 

00 

00 

00 

00 

00 

3B 

2242! 

B9 

A3 

22 

48 

B9 

A2 

22 

48 

F9 

224A! 

A5 

9D 

60 

AE 

3E 

25 

9fl 

A9 

25 

2252! 
22SAi 

07 
23 

BD 
99 

36 

00 

25 
02 

AO 
C8 

00 
CO 

B9 
07 

IS 
DO 

2A 
DE 

Program  2:  Apple  Speed- 

■2-2b1: 

F5 

A9 

00 

99 

00 

02 

60 

00 

6E 

Co/c  for  ProDOS 

llbf^: 

00 

04 

04 

05 

05 

06 

06 

07 

D3 

Pleas©  refer  to  the  "MLX' 

article  in  this  issue 

2272s 

07 

04 

04 

05 

OS 

Oh 

OA 

07 

FIF 

before  entering  the  following  listing. 

227A: 

07 

04 

04 

05 

05 

06 

06 

07 

67 

22B2! 

07 

00 

BO 

00 

BO 

00 

80 

OO 

5F 

22BA: 

80 

2B 

AB 

28 

AB 

28 

A8 

28 

10 

START 

ADDRESS: 

2000 

2292: 

AB 

50 

DO 

50 

DO 

50 

DO 

50 

18 

EHD    ADDRESS 

3D67 

229A: 

DO 

00 

01 

02 

02 

03 

03 

04 

AD 

22A2S 

01 

22 

01 

22 

CO 

E7 

A9 

E7 

13 

2000: 

4C 

A7 

3A 

00 

OA 

08 

OA 

00 

IC 

220  A! 

81 

E9 

F2 

21 

96 

EE 

4E 

54 

FB 

2000: 

A5 

AB 

33 

30 

00 

14 

08 

14 

E3 

22B2: 

46 

00 

2C 

40 

40 

41 

41 

41 

6E 

2010: 

00 

8C 

32 

30 

38 

33 

00 

IE 

69 

22BA: 

42 

41 

43 

41 

44 

41 

45 

41 

DF 

201Bt 

08 

IE 

00 

BC 

32 

30 

38 

30 

9F 

22C2! 

46 

41 

47 

41 

48 

41 

49 

41 

92 

2020: 

00 

00 

00 

4C 

88 

22 

20 

SB 

8A 

22CAi 

4A 

41 

4B 

41 

4C 

41 

4D 

41 

45 

2028: 

FC 

AD 

61 

CO 

BD 

C9 

25 

A9 

12 

22D2: 

4E 

41 

4F 

41 

SO 

41 

51 

41 

F7 

2030: 

00 

BD 

F2 

03 

A9 

09 

8D 

F3 

E2 

22DA: 

52 

41 

53 

41 

54 

41 

55 

41 

AA 

203B! 

03 

49 

A5 

8D 

F4 

03 

A9 

FD 

DE 

22E2: 

56 

41 

57 

41 

SB 

41 

59 

41 

5D 

2040: 

85 

39 

as 

37 

fl9 

IB 

85 

3B 

B2 

22EA: 

5A 

42 

41 

42 

42 

42 

43 

42 

ID 

2048! 

A9 

FO 

85 

36 

A9 

25 

IB 

69 

29 

2050: 

01 

BD 

60 

25 

IB 

69 

4F 

BS 

5D 

22F2! 

44 

42 

45 

42 

46 

42 

47 

42 

C2 

2058 1 

6C 

A9 

00 

BD 

5F 

25 

8D 

61 

IE 

22FAs 

48 

42 

49 

42 

4A 

42 

4B 

42 

75 

2060: 

25 

85 

6B 

BD 

Dl 

22 

85 

FF 

FC 

2302: 

4C 

42 

4D 

42 

4E 

42 

4F 

42 

29 

2068: 

8D 

CB 

25 

A9 

B9 

8D 

62 

25 

CE 

230A: 
2312: 

50 
54 

42 
42 

51 
55 

42 
42 

52 
56 

42 
42 

33 
57 

42 
42 

DB 
8E 

2070: 
2078: 

A9 
A9 

09 
23 

20 

AO 

61 
AE 

09 

20 

20 

3E 

D9 
09 

OA 
20 

68 
81 

231A: 

58 

2A 

45 

52 

52 

4F 

52 

2A 

83 

2080: 

as 

OD 

20 

25 

09 

48 

20 

7C 

C4 

2322: 

C5 

DB 

C9 

D4 

BA 

AO 

CI 

D2 

B6 

2088 1 

09 

6B 

A£ 

AC 

OB 

DD 

AC 

08 

21 

232A: 

C5 

AO 

D9 

CF 

D5 

AO 

D3 

D5 

62 

2090: 

FO 

OA 

CA 

DO 

F8 

C9 

20 

90 

Fl 

2332: 

D2 

C5 

AO 

AS 

D9 

AF 

CE 

A9 

C6 

2098: 

E6 

4C 

37 

OC 

CA 

8A 

OA 

AA 

46 

233A! 

BF 

00 

D3 

DO 

C5 

CS 

C4 

C3 

7A 

20A0: 

A9 

08 

48 

A9 

7B 

4B 

BD 

D3 

A7 

2342: 

CI 

CC 

C3 

00 

D3 

DO 

C3 

CS 

48 

20  AS: 

08 

48 

BD 

D2 

OB 

48 

60 

17 

ID 

234A: 

C4 

C3 

CI 

CC 

C3 

AO 

C2 

D9 

EB 

20B0: 

OE 

00 

17 

06 

07 

10 

03 

13 

CC 

2352: 

AO 

CB 

C5 

D6 

C9 

CE 

AO 

CD 

9A 

20B8: 

OC 

IB 

OA 

OB 

15 

OB 

02 

05 

CB 

235A: 

CI 

D2 

D4 

C9 

CE 

00 

CE 

CS 

47 

20C0: 

21 

01 

12 

04 

OD 

IB 

23 

OD 

7C 

2362: 

D7 

BA 

AO 

CI 

D2 

C5 

AO 

D9 

3C 

20C8: 

31 

32 

33 

34 

33 

36 

37 

38 

01 

236A! 

CF 

D5 

AO 

D3 

D5 

D2 

C5 

AO 

85 

20D0: 

39 

30 

2B 

2D 

2E 

C4 

OA 

DB 

66 

2372: 

AB 

D9 

AF 

CE 

A9 

BF 

00 

D7 

OA 

20DS! 

11 

13 

10 

A8 

OC 

4E 

11 

32 

EO 

237A! 

C9 

C4 

D4 

CB 

BA 

00 

C7 

CF 

33 

20E0: 

14 

E6 

15 

9B 

19 

31 

lA 

10 

13 

23B2: 

D4 

CF 

BA 

00 

D2 

C5 

C3 

CI 

75 

20E8! 

IF 

DD 

10 

F6 

10 

OD 

11 

37 

AF 

23BA! 

CC 

C3 

OS 

CC 

CI 

D4 

C9 

CF 

74 

20F0! 

11 

CF 

IC 

16 

ID 

43 

IC 

3E 

FE 

2392: 

CE 

AO 

C9 

D3 

AO 

CF 

00 

D3 

F6 

20F8! 

IE 

E2 

IC 

BB 

IB 

CJ 

15 

08 

4F 

239At 

CI 

D6 

C5 

BA 

00 

CC 

CF 

CI 

70 

2100: 

09 

ED 

OC 

20 

58 

FC 

20 

22 

DE 

23A2! 

C4 

BA 

00 

C6 

CF 

D2 

CD 

CI 

8D 

2108: 

OB 

4C 

75 

08 

AD 

C8 

25 

49 

36 

23AA: 

D4 

BA 

AO 

AO 

CC 

C5 

C6 

D4 

OB 

2110: 

FF 

SD 

ca 

25 

60 

2C 

00 

CO 

95 

23B2: 

AC 

AO 

C3 

C3 

CE 

D4 

C5 

D2 

74 

2118: 

10 

OB 

AD 

00 

CO 

SD 

10 

CO 

F7 

23BA: 

AC 

AO 

CF 

D2 

AO 

D2 

C9 

C7 

52 

2120: 

29 

7F 

C9 

FF 

60 

A9 

00 

60 

lA 

23C2: 

CS 

D4 

AO 

CA 

D5 

D3 

D4 

C9 

D4 

2128: 

A5 

FF 

FO 

07 

48 

A9 

00 

85 

3A 

23CA; 

C6 

D9 

BF 

00 

C6 

CF 

D2 

CD 

CB 

2130: 

FF 

6B 

60 

20 

12 

09 

FO 

FB 

2D 

23D2: 

CI 

D4 

BA 

AO 

AO 

A3 

AO 

CF 

35 

2138: 

60 

20 

F2 

EB 

A5 

AO 

A4 

Al 

6A 

23DA: 

C6 

AO 

C4 

C5 

C3 

C9 

CD 

CI 

44 

2140: 

60 

85 

FC 

84 

FB 

20 

6F 

09 

44 

23E2: 

CC 

AO 

DO 

CC 

CI 

C3 

CS 

D3 

16 

214BS 

20 

BO 

FE 

A9 

00 

85 

28 

85 

21 

23EA: 

BA 

00 

BD 

DO 

02 

CS 

D3 

D3 

76 

21501 

24 

B5 

25 

A9 

04 

85 

29 

AO 

6E 

23F2: 

AO 

02 

C5 

D4 

D5 

D2 

CE 

00 

DB 

215B: 

00 

Bl 

FB 

FO 

06 

20 

ED 

FD 

20 

23FA: 

DO 

D2 

CF 

C3 

C5 

D3 

D3 

C9 

83 

2160! 

C8 

DO 

F6 

60 

A2 

32 

9D 

66 

9F 

2402: 

CE 

C7 

AO 

C4 

CI 

D4 

CI 

AO 

89 

2168: 

25 

CA 

DO 

FA 

A9 

28 

BD 

99 

5C 

240A: 

D4 

D2 

CI 

CE 

D3 

C6 

CS 

D2 

AE 

2170: 

25 

60 

AO 

00 

A9 

20 

99 

00 

72 

2412: 

00 

CE 

CF 

D4 

AO 

C5 

CE 

CF 

DE 

2178: 

04 

CB 

CO 

28 

DO 

F6 

60 

AD 

5A 

241A: 

D5 

C7 

C8 

AO 

D2 

CF 

CF 

CD 

A5 

2180: 

01 

04 

C9 

10 

DO 

OA 

AD 

OA 

92 

2422: 

AO 

D4 

CF 

AO 

C5 

CE 

D4 

C5 

CC 

2168: 

04 

C9 

02 

FO 

03 

4C 

94 

09 

OA 

242A: 

D2 

AO 

C4 

CI 

D4 

CI 

00 

CD 

34 

21901 

ft9 

23 

AO 

A4 

20 

3E 

09 

33 

13 

2432: 

CF 

D6 

C5 

AO 

C3 

D5 

D2 

D3 

C9 

219B! 

20 

02 

20 

90 

03 

4C 

32 

OF 

35 

243A: 

CF 

D2 

AO 

D4 

CF 

AO 

D4 

CF 

FA 

21AOs 

4C 

40 

OF 

09 

80 

BD 

BO 

02 

ca 

2442: 

DO 

AO 

CC 

C5 

C6 

D4 

AO 

CF 

AB 

21AB! 

A9 

3C 

BD 

Bl 

02 

A2 

76 

A9 

C9 

244A! 

C6 

AO 

CE 

C5 

D7 

AO 

DO 

CF 

07 

21B0! 

AO 

9D 

81 

02 

CA 

DO 

FB 

AO 

27 

2452: 

D3 

C9 

D4 

C9 

CF 

CE 

00 

CD 

B5 

21BS: 

01 

DO 

02 

AO 

00 

B9 

80 

02 

E3 

245A: 

CF 

D6 

C5 

AO 

C3 

D5 

D2 

D3 

Fl 

21C0: 

BD 

AC 

25 

A9 

DF 

99 

80 

02 

9C 

2462: 

CF 

D2 

AO 

D4 

CF 

AO 

C2 

CF 

FE 

21C8: 

20 

AB 

OA 

20 

12 

09 

DO 

16 

B5 

246fi: 

D4 

D4 

CF 

CD 

AO 

D2 

C9 

C7 

D4 

21D0: 

EE 

AB 

25 

10 

08 

A9 

DF 

99 

SB 

2472: 

CB 

D4 

AO 

CF 

C6 

AO 

C2 

CC 

70 

21D8: 

80 

02 

4C 

C5 

09 

AD 

AC 

25 

3F 

247A: 

CF 

C3 

CB 

00 

DO 

D2 

C9 

CE 

49 

21E0: 

99 

ao 

02 

4C 

C5 

09 

09 

80 

F9 

2482> 

D4 

r.? 

CE 

C7 

AE 

AE 

AE 

00 

BB 

21E8: 

BD 

AB 

25 

AD 

AC 

25 

99 

BO 

OA 

24BA: 

D3 

CC 

CF 

D4 

AO 

A3 

00 

DO 

9B 

21F0: 

02 

AD 

AB 

25 

AE 

95 

OA 

DD 

25 

2492: 

D2 

C9 

CE 

D4 

AO 

D4 

CF 

BA 

90 

21F8: 

95 

OA 

FO 

2C 

CA 

DO 

FB 

C9 

BE 

249A: 

AO 

AO 

D3 

C3 

D2 

CS 

CS 

CE 

lA 

2200: 

AO 

90 

BA 

BC 

AC 

25 

CE 

AC 

ID 

24A2: 

AC 

AO 

C4 

C9 

D3 

CB 

AO 

CF 

7D 

2208: 

25 

A2 

77 

BD 

80 

02 

C9 

3C 

2E 

24AA: 

D2 

AO 

DO 

D2 

C9 

CE 

D4 

C5 

C4 

2210: 

FO 

AB 

CA 

BD 

80 

02 

9D 

81 

BS 

24B2: 

D2 

BF 

00 

C6 

C9 

CC 

C5 

CE 

9C 

221B: 

02 

CA 

EC 

AC 

25 

DO 

F4 

AD 

7C 

24Bfl: 

CI 

CD 

C5 

BA 

00 

CE 

CF 

AO 

37 

2220: 

AB 

25 

99 

ao 

02 

C8 

DO 

95 

29 

222BI 
2230! 
223Bi 
2240: 
2248: 
2250: 
225B! 
2260: 
2268! 
2270: 
2278! 
2280: 
2288: 
2290: 
2298: 
22  AO: 

22  AB: 
22B0: 
22BB: 
22C0: 
22CB: 
22D0: 
22DBi 
22E0: 
22E8! 
22f0: 
22FB: 
2300: 
230B: 
2310: 
231Bi 
2320: 
2328: 
2330: 
233Bi 
2340: 
2348: 
2350: 
235B! 
2360: 
2368: 
2370! 
237fl: 
23B0J 
238B! 
23901 
2398! 
23A05 

23  AS  J 
23B05 
23BBt 
23C0: 
23C8I 
23D0: 
23D8: 
23E0S 
23Eai 
23F0! 
23F8: 
24O0! 
2408: 
2410: 
2418: 
2420: 
2428: 
24301 
2438: 
2440: 
2448: 
2450: 
2458: 
2460: 
2468: 
2470: 
24781 
2480: 
2488: 
2490: 
2498: 

24  AO: 
24  AS: 
24B0: 
24BBi 
24C0: 
24C8! 
24D0: 
24D8> 


CA  BA 
BD  9D 
80  02 
99  00 
99  00 
D2  22 
88  4C 
13  B9 
CB  4C 
03  4C 
7F  85 
FO  D7 
9D  80 
A9  AO 
07  BD 
31  OA 
4B  OA 
BD  BO 
02  9D 
80  05 
A9  23 
25  09 
OA  4C 
09  20 
SB  OD 
00  SD 
AS  6C 
85  FB 
00  9B 
FC  A6 
A9  01 
85  ID 
4C  BO 
B9  EB 
85  29 

00  8D 
AD  99 
23  AD 
25  CA 
BD  OB 

01  SD 
00  BD 
AC  AB 
B9  D3 
EO  12 
AD  9A 
CS  AD 
4A  4A 
AD  99 
91  2B 
85  2S 
00  A9 
CB  91 

00  BD 
99  25 
20  91 
99  25 
3F  91 
3F  91 
66  25 
91  28 
25  BD 
SD  63 
6D  63 
SE  A2 

01  60 
F9  60 
FO  3F 

05  DD 
F8  A9 
C9  25 
20  SI 
A9  00 
25  AD 
20  02 
IC  4C 
20  B7 
A9  00 
IB  6D 
25  BO 
SE  AC 
25  30 
25  BD 
20  3E 
FO  OF 
FO  03 

06  A2 


OA  AA 
OA  48 
C9  3C 
03  CB 
03  BC 
FO  20 
BA  09 
80  02 
BA  09 
BA  09 
FF  4C 
8B  98 
02  EB 
9D  80 
9B  8A 
7A  OA 
3B  OA 
02  9D 

00  OS 
E8  EO 
AO  CB 
C9  5" 
7C  09 
61  09 
A9  2C 
IB  23 
85  09 
AD  60 
91  FB 
FC  EC 
8D  64 
85  IE 
OB  AO 
22  85 
AO  00 
99  25 
25  IB 
9A  25 
DO  EC 
FB  AD 
99  25 
9A  25 
25  B9 
22  85 
DO  D3 
25  IB 
99  25 
18  69 
25  29 
60  AO 
B9  D3 
20  91 
2S  C8 
63  25 
4A  69 
28  CB 
OA  AA 
2B  CB 
28  CS 
4A  AA 
CS  CA 
66  25 
25  E8 
25  C9 
25  A9 
91  28 
20  AO 
C9  3D 
C4  08 

01  DO 
BO  25 
OC  20 
FO  02 
IC  23 
20  20 


7C 
00 


SD  AS 
AS  25 
03  CA 
25  60 
03  AD 
C7  25 
09  20 
C9  43 
4C  B5 
08  DO 


BD  9E 
60  AO 
FO  OB 
DO  Fl 
9C  25 
CO  00 
AD  D2 
C9  3C 
AD  D2 
AD  AB 
32  OA 
AA  BD 
C9  3C 
02  4C 
SB  SB 

68  OA 
7A  OA 
80  04 
BD  DO 
28  DO 
20  3E 
DO  03 
20  FA 
20  22 
SD  IC 
AS  6B 
60  AD 
25  BS 
C8  DO 
62  25 
25  8D 

60  20 
05  8C 

28  B9 
AE  65 
SD  9A 

69  01 
69  00 
DS  A2 
99  23 
AD  9A 
DS  EE 
EB  22 

29  AO 
20  SD 
69  30 

29  FO 

30  91 
OF  18 
04  B9 
22  85 
28  CB 
AE  64 
BD  66 
00  AA 
CA  DO 
BD  ID 
BD  IE 
AE  99 
CA  CA 
10  FA 
IB  6D 
BD  66 
25  90 
20  CO 
CB  CO 
09  AD 
FO  26 
FO  07 
19  AD 
AO  00 
B7  00 
A9  02 
BD  9D 
62  20 
B5  B9 
4A  EC 
25  BD 
BD  A8 
DO  EF 
A9  00 

61  CO 
AO  OD 
25  09 
FO  OF 
OD  A2 
02  A2 


OA 

48 

25 

00 

B9 

BF 

29 

7F 

B3 

A9 

00 

DF 

60 

AD 

6A 

FO 

01 

BF 

22 

FO 

C9 

FO 

Fl 

DF 

22 

FO 

F9 

25 

29 

CO 

CO 

00 

DD 

SI 

02 

IF 

DO 

F5 

61 

BA 

09 

4D 

95 

FF 

89 

68 

OA 

36 

A2 

00 

02 

BD 

AS 

46 

02 

9D 

BS 

E9 

60 

6A 

09 

20 

77 

20 

D9 

65 

OA 

A9 

FF 

OB 

20 

2E 

23 

A9 

79 

85 

08 

IC 

5F 

25 

OA 

FC 

AO 

9D 

FB 

E6 

CE 

DO 

F2 

29 

65 

25 

BA 

28 

OB 

El 

AB 

25 

03 

D3 

22 

DC 

25 

A9 

9E 

25 

FB 

B9 

BD 

99 

F5 

BD 

9A 

3B 

00 

20 

3E 

18 

69 

25 

25 

69 

A3 

AB 

25 

BE 

85 

28 

5B 

00 

EB 

E9 

OB 

60 

CB 

91 

28 

Dl 

4A 

4A 

20 

2B 

CB 

19 

69 

30 

3F 

EB 

22 

EO 

29 

AO 

SA 

91 

28 

3E 

25 

A9 

64 

25 

BE 

99 

CA 

A9 

FE 

FA 

AD 

6A 

23 

29 

03 

23 

29 

A2 

25 

BD 

BB 

A9 

20 

AD 

AE 

99 

4C 

63 

25 

DB 

25 

18 

ID 

AD 

CA 

CA 

2B 

DO 

C4 

28 

DO 

30 

00 

03 

A5 

AE 

C4 

20 

CA 

DO 

2F 

9C 

25 

BA 

A9 

03 

92 

DO 

E9 

ES 

8D 

9B 

CF 

25 

IB 

Bl 

20 

3E 

69 

B4 

B8 

CE 

A2 

32 

11 

66 

25 

FB 

25 

C9 

D2 

ES 

ES 

B5 

2C 

C9 

7D 

OD 

C8 

C3 

A9 

24 

F2 

C9 

4C 

FB 

C9 

52 

64 

OC 

DO 

10 

04 

AD 

2B 

February  1986    COMPUTEI     99 


24E0: 
Z4E8: 
24F0: 
24F8: 
2500: 
250B: 
2510! 
2Sies 
25201 
252B: 
2530: 
2538: 
2540: 
254B: 
2550: 
25SB! 
25t0i 
2S(bBi 
2570: 
257S; 
2580: 
25eSi 
2590! 
25981 
25A0: 

25  AS: 
25B0: 
25B8: 
25C0! 
25C8! 
25D0! 
2SDBi 
25E0S 
25E8: 
25F0i 
25FB! 
2600! 
260B: 
2610: 
261B: 
2620! 
2628: 
2630: 
2638: 
2640! 
2648: 
2650: 
2658: 
2660: 
266B: 
2670: 
267BI 
2680: 
2688: 
2690: 
2698: 

26  AO: 
26^8: 
26B0: 
26BB: 
26C0: 
26C8! 
26Dd: 
26D8: 
26E0: 
26EB: 
26F0: 
26F8! 
2700: 
2708: 
2710: 
2718: 
2720s 
272B: 
2730: 
273Bi 
2740: 
2748: 
2750: 
2758! 
2760: 
2768: 
2770: 
2778: 
2780: 
2788: 
2790: 


IC  23 
OD  AB 
OD  A9 
AD  61 
25  AO 
20  76 
02  20 

00  DO 
IL  23 
OA  OA 
AB  25 
AB  25 
85  IB 

01  Bl 
Bl  IB 
OD  IC 
18  69 
00  85 
DB  38 
3B  20 
AD  AB 
4C  7C 
A5  IE 
63  25 
65  25 
8D  9E 
25  A9 
CC  Al 
A3  25 
65  25 
B9  EB 
20  BO 
AD  9B 
6C  AD 
AA  EB 
29  OC 
BA  4A 
A9  AO 
91  28 
25  AD 
AA  AO 
25  AD 

02  Bl 
25  09 
AC  A4 
09  C8 
A9  OE 
AE  9C 
25  BO 
09  80 
AE  A8 
FA  A4 
25  FO 
AC  65 
18  6D 
36  ID 
25  18 
IC  4C 
AD  63 
8B  A9 
88  CA 
ED  63 
34  IE 
EB  22 
A8  25 
DO  FA 
DO  EO 
Al  25 
99  80 
38  20 
A2  00 

09  AC 
25  CB 
02  E8 
A9  3C 
BD  18 
4C  AB 
A9  3C 
60  A9 
Bl  19 
25  4A 
A2  FF 
C9  2E 

10  EB 
C8  CC 
E5  AD 
FO  lA 


29  FO 
25  3D 
00  2C 
CO  OD 
36  A9 
10  FO 
81  OC 
6D  CO 

29  OC 
OA  OA 
AD  C7 
BD  IC 
AD  60 
IB  FO 

es  I"? 

23  91 
02  85 
IC  A5 
20  02 
02  20 
25  OD 
09  A5 
80  Al 
AE  64 

84  IE 
25  BD 
FF  EC 
25  DO 
98  IB 
AB  B9 

22  8S 
05  A9 
25  FO 
A8  25 

30  32 
C9  08 
FO  22 
2D  A3 
C8  CA 
AB  25 

02  4C 
63  25 

19  BC 
SO  2D 
25  EE 
CC  9C 
4C  76 
25  CA 

03  4C 
2D  A3 
25  91 
IE  A6 
05  84 
25  34 
63  25 
EO  33 
6D  63 
AB  OD 
25  IB 
AO  2D 
DO  FA 
25  8D 
B9  D3 

85  28 
A9  AO 
£6  IE 
AD  AO 
85  IE 
02  CB 
02  20 
AD  9B 
9C  25 
Bl  19 
ca  CC 
9D  80 

23  29 
OA  A"? 
8D  80 

20  8D 
C9  2A 
4A  4A 
C9  OF 
DO  09 
BE  00 
9C  25 
A6  25 
AD  00 


BD  AB 
AB  25 
C9  25 
C8  25 

24  20 
7B  AO 
20  36 

10  BO 
80  AB 
OD  AB 

25  10 
23  AD 
25  85 

11  35 
Bl  19 

19  CB 
IB  A5 
IC  C5 

20  4C 

90  OA 
9B  25 
ID  8D 
25  A9 
25  86 
98  18 
66  25 
AO  25 
02  A9 

69  05 
D3  22 
28  38 
AO  4C 

70  C9 
38  ED 
EB  AD 
FO  28 
AA  8E 
25  AC 
DO  FA 
38  ED 
2E  OE 
8D  A5 
A4  25 
A3  25 
A5  25 
25  DO 
OE  20 
CA  CA 
E6  OD 
25  AC 
28  C8 
ID  CB 
IE  4C 
IE  AD 
BD  63 
FO  27 
25  C9 
EO  00 
6D  AB 
A3  25 
60  A9 
AS  25 
22  85 
AC  63 

91  28 
A4  IE 
25  35 
AO  00 
CO  78 
90  35 
25  C9 
Bl  19 
09  80 
9C  25 
02  AE 
3F  BD 
20  80 
02  20 
00  02 
FO  F2 
4A  80 
FO  E2 
AE  A6 
02  99 
FO  03 
FO  IE 
02  C9 


25  8A  24 
4C  2F  D9 
30  03  33 
BD  C7  17 

3E  09  BD 
00  A9  19 
09  C9  OA 
69  AD  14 
25  98  25 
25  BD  CA 
41  AD  65 
5F  25  CB 
le  AO  E7 
lA  33  4D 
29  03  C3 
A5  IB  FF 
IC  69  BA 
6C  DO  93 
35  OD  A3 
AO  00  17 
91  19  AF 
AO  25  19 
03  8D  64 
ID  AC  24 
69  13  64 
8D  AB  6D 
DO  07  09 
3F  SD  46 
38  ED  78 
85  29  IB 
20  02  F3 
67  OE  AD 
02  FO  3C 
9C  25  14 
9D  25  52 
BO  05  23 
A4  25  62 
63  25  F8 
aC  A5  26 
A4  25  Bl 
AE  AB  9E 
25  AO  IF 
AC  A5  8E 
91  28  39 
CA  FO  E7 
E2  20  01 
4E  OF  82 
EC  A8  78 
A9  2A  79 
63  25  01 
CA  DO  C6 
CC  9E  OD 
A8  OD  05 
A8  25  SF 
25  ES  30 
BD  66  C4 
28  BO  BA 
FO  14  F8 
25  AS  D3 
91  28  97 

28  38  FF 
AO  05  82 

29  B9  BE 
25  AE  C2 
C8  CA  93 
CO  IB  52 
ID  AD  C4 
A9  AO  EA 
DO  FS  BA 
AO  02  59 
02  DO  44 
8D  9C  A5 
90  80  01 
DO  F2  A5 
9B  25  45 
27  04  E4 
27  04  05 
AB  OA  26 
AO  02  61 
AD  90  ED 
A6  25  BC 
Bl  19  CI 
25  FO  25 
FF  01  52 
CA  DO  46 
EO  00  IE 
20  DO  DB 


27981 

OA 

A9 

2E 

99 

FF 

01 

C9 

AE 

F9 

2  ASS  J 

99 

25 

20 

Bl 

00 

AE 

99 

25 

F4 

27A0! 

A6 

25 

ES 

A9 

30 

99 

FF 

01 

2C 

2A60! 

CA 

BA 

OA 

AA 

BD 

90 

12 

48 

45 

27AB1 

C8 

CA 

DO 

F9 

A9 

20 

80 

00 

BO 

2A68: 

BD 

SF 

12 

48 

60 

OC 

41 

41 

3D 

27B0! 

02 

CC 

9C 

25 

FO 

OC 

BO 

3F 

71 

2A701 

43 

45 

49 

4C 

53 

53 

53 

54 

83 

27BB! 

Bl 

19 

C9 

2E 

FO 

08 

C9 

35 

B2 

2A7B1 

53 

41 

42 

54 

4F 

58 

4E 

4F 

IC 

27C0! 

BO 

OC 

CB 

4C 

F4 

OF 

CB 

Bl 

6F 

2AaO: 

47 

49 

51 

41 

55 

56 

53 

4E 

02 

27C8I 

19 

C9 

35 

90 

2A 

88 

98 

C8 

33 

2ABBi 

53 

50 

54 

47 

4E 

4E 

52 

4E 

38 

27D0t 

AA 

CA 

CA 

BD 

00 

02 

C9 

2E 

26 

2A90: 

40 

45 

AE 

EB 

9D 

FO 

E9 

EF 

E5 

27DBI 

FO 

OB 

90 

OC 

C9 

39 

DO 

14 

IE 

2A9BS 

08 

EF 

22 

EC 

40 

E9 

8F 

EB 

B4 

27E0J 

A9 

30 

VD 

00 

02 

CA 

10 

EB 

OB 

2AA0: 

FO 

EF 

BC 

EE 

39 

FO 

A9 

13 

DD 

27E8! 

CA 

9D 

00 

02 

EB 

A9 

31 

9D 

12 

2AAB! 

11 

14 

20 

64 

13 

8E 

C2 

25 

52 

27F0! 

00 

02 

DO 

03 

FE 

00 

02 

86 

BE 

2  ABO: 

8C 

C4 

25 

20 

B7 

00 

C9 

3A 

AE 

27FBt 

8C 

9C 

25 

AD 

00 

02 

C9 

20 

EF 

2AB81 

DO 

3F 

20 

Bl 

00 

20 

64 

13 

CO 

2800: 

DO 

09 

A9 

01 

85 

lA 

A9 

FF 

28 

2AC0i 

BE 

C3 

25 

8C 

C5 

25 

20 

B7 

75 

2808: 

85 

19 

60 

A9 

01 

85 

lA 

A9 

04 

2AC8! 

00 

C9 

29 

DO 

2C 

20 

Bl 

00 

07 

2810: 

FE 

85 

19 

EE 

9C 

25 

60 

A9 

37 

2  ADO  I 

AE 

C2 

25 

CA 

EC 

C3 

25 

90 

CF 

28181 

00 

2C 

C9 

25 

30 

03 

AD 

61 

49 

2ADBI 

03 

4C 

88 

22 

AC 

C4 

25 

63 

40 

2820! 

CO 

00 

C8 

25 

8D 

C7 

25 

A9 

FE 

2AE01 

CC 

C5 

25 

90 

03 

4C 

BB 

22 

37 

2B281 

23 

AO 

El 

20 

3E 

09 

20 

76 

3D 

2AEB: 

EB 

C8 

A5 

ID 

3D 

A9 

25 

A5 

60 

28301 

10 

AO 

00 

A9 

02 

20 

81 

OC 

EA 

2AF0: 

IE 

80 

AA 

25 

86 

ID 

64 

IE 

2F 

28381 

20 

36 

09 

C9 

00 

DO 

33 

CO 

4£ 

2AFei 

60 

4C 

88 

22 

18 

20 

02 

20 

29 

28401 

04 

90 

2F 

CO 

25 

BO 

2B 

A5 

90 

2BO0: 

90 

42 

AO 

00 

Bl 

19 

29 

03 

BA 

28481 

ID 

BD 

64 

25 

AO 

C7 

25 

10 

50 

2B08: 

C9 

01 

FO 

38 

CB 

Bl 

19 

BD 

Fl 

28501 

07 

98 

20 

61 

09 

4C 

5B 

10 

A4 

2B10: 

AC 

25 

A2 

00 

CB 

Bl 

19 

9D 

37 

28581 

98 

A6 

ID 

90 

66 

25 

20 

88 

AF 

2B16! 

00 

02 

E8 

C8 

CC 

AC 

25 

DO 

CC 

2B601 

OC 

A5 

ID 

CD 

AC 

25 

90 

07 

C2 

2B20: 

F4 

A5 

BB 

46 

A5 

B9 

48 

A9 

44 

28681 

AC 

AC 

25 

88 

8C 

64 

25 

20 

C7 

2B281 

00 

90 

00 

02 

A9 

02 

AO 

00 

9C 

2B70: 

BO 

OB 

4C 

7C 

09 

A9 

01 

DO 

EE 

2B30: 

20 

81 

OC 

66 

85 

B9 

63 

85 

68 

28781 

02 

A9 

00 

80 

A7 

25 

AO 

00 

20 

2B38: 

88 

A5 

ID 

CD 

C3 

25 

FO 

13 

7E 

2880: 

A9 

IF 

20 

ED 

FD 

A9 

BB 

20 

18 

2B40: 

E6 

10 

IB 

60 

AD 

A9 

25 

85 

3E 

28881 

ED 

FD 

20 

25 

09 

C9 

OD 

FO 

20 

2B48: 

ID 

AD 

AA 

25 

85 

IE 

18 

20 

35 

2890: 

3F 

C9 

08 

FO 

26 

C9 

7F 

FO 

4B 

2B50i 

02 

20 

4C 

88 

22 

AD 

C2 

25 

34 

289B1 

22 

C9 

20 

90 

ED 

AE 

A7 

25 

18 

2B5S: 

85 

ID 

A5 

IE 

CD 

C5 

25 

FO 

10 

28A0I 

DO 

OS 

C9 

30 

90 

E4 

C9 

3A 

7D 

2B60! 

04 

E6 

IE 

18 

60 

33 

60 

A2 

FE 

28A8I 

BO 

EO 

A6 

24 

EO 

26 

FO 

OA 

FC 

2B68! 

00 

20 

B7 

00 

C9 

41 

FO 

06 

FB 

28B0! 

99 

00 

02 

09 

80 

20 

ED 

FD 

FC 

2B70! 

C9 

42 

DO 

DO 

A2 

lA 

8E 

AB 

A9 

28B8I 

CB 

DO 

C5 

CO 

00 

FO 

CB 

A9 

6B 

2B78: 

25 

20 

Bl 

00 

C9 

41 

90 

C4 

D3 

28C01 

AO 

20 

EO 

FD 

A9 

88 

20 

ED 

A4 

2BB0! 

C9 

SB 

BO 

CO 

33 

E9 

40 

IB 

B6 

23C8I 

FD 

20 

ED 

FD 

88 

4C 

70 

10 

3E 

2BBS! 

60 

AB 

25 

C9 

33 

BO 

B5 

80 

17 

28D0: 

A9 

AO 

20 

ED 

FD 

A9 

00 

99 

31 

2B901 

AB 

25 

20 

Bl 

00 

BO 

AD 

20 

63 

2BD81 

00 

02 

BC 

A6 

25 

AD 

00 

02 

87 

2B98> 

4A 

EC 

20 

36 

09 

C9 

00 

DO 

F6 

28E0: 

60 

AS 

IE 

C9 

ce 

FO 

12 

E6 

40 

2BA01 

A3 

CO 

00 

FO 

9F 

CO 

C9 

BO 

4C 

2eE8i 

IE 

AD 

65 

25 

18 

69 

12 

C5 

03 

2BAB: 

9B 

AE 

AB 

25 

60 

A9 

01 

80 

79 

28F01 

IE 

BO 

06 

EE 

65 

25 

20 

28 

54 

26B01 

99 

25 

A9 

00 

BD 

9A 

25 

20 

93 

28F81 

OB 

60 

A5 

IE 

C9 

01 

FO 

10 

CI 

2BB8t 

A7 

12 

20 

F9 

12 

BO 

47 

20 

OD 

2900! 

C6 

IE 

AC 

65 

25 

88 

C4 

IE 

IC 

2BC0! 

72 

EB 

A5 

A2 

46 

A5 

Al 

4B 

6E 

29081 

90 

06 

CE 

65 

25 

20 

28 

OB 

59 

2BC8: 

AS 

AO 

48 

A5 

9F 

48 

A5 

9E 

85 

29101 

60 

A5 

ID 

C9 

32 

FO 

23 

E6 

BE 

2BD0i 

48 

A5 

9D 

48 

EE 

99 

25 

DO 

E5 

2918: 

ID 

AC 

A2 

25 

C4 

ID 

BO 

lA 

EO 

2BD81 

03 

EE 

9A 

25 

20 

F9 

12 

08 

27 

29201 

EE 

64 

25 

AE 

64 

25 

A9 

00 

9D 

2BE01 

68 

3D 

AB 

25 

66 

85 

A5 

68 

A3 

29281 

IB 

7D 

66 

25 

EB 

C9 

25 

90 

4E 

2BE81 

85 

A6 

68 

85 

A7 

68 

85 

A8 

A3 

2930: 

F7 

CA 

CA 

E4 

ID 

90 

E9 

20 

F7 

2BF0: 

68 

85 

A9 

68 

35 

AA 

45 

A2 

9C 

29381 

BO 

OB 

60 

AS 

ID 

C9 

01 

FO 

OF 

2BF8! 

85 

AB 

A5 

90 

20 

CI 

E7 

AD 

11 

29401 

10 

C6 

ID 

AC 

64 

25 

88 

C4 

48 

2C001 

AB 

25 

48 

28 

90 

B9 

AD 

A9 

73 

2948 1 

ID 

90 

06 

CE 

64 

25 

20 

BO 

A3 

2C08I 

25 

35 

ID 

AO 

AA 

25 

85 

IE 

E5 

2950! 

OB 

60 

A9 

23 

AO 

ES 

20 

3E 

CE 

2C101 

18 

20 

02 

20 

60 

20 

AA 

13 

AA 

2958 1 

09 

20 

72 

10 

ft9 

01 

85 

B9 

9C 

2C18: 

A2 

06 

B5 

9C 

95 

A4 

CA 

DO 

69 

2960: 

A9 

FF 

85 

B8 

20 

Bl 

00 

90 

IC 

2C20! 

F9 

AD 

9A 

25 

AC 

99 

23 

20 

BC 

2968  s 

4E 

38 

E9 

41 

30 

49 

FO 

06 

CF 

2C2S1 

F2 

E2 

A5 

AA 

45 

A2 

85 

AB 

7D 

29701 

C9 

02 

BO 

43 

A9 

lA 

80 

AB 

EE 

2C30! 

A5 

9D 

20 

2E 

22 

60 

20 

58 

D4 

2978! 

25 

20 

Bl 

00 

90 

39 

33 

E9 

5F 

2C38: 

FC 

A9 

01 

8D 

C6 

25 

A9 

00 

90 

2930 1 

40 

30 

34 

FO 

32 

C9 

IB 

BO 

34 

2C40! 

2C 

C9 

25 

30 

03 

AD 

61 

CO 

IB 

29881 

2E 

18 

6D 

AB 

25 

C9 

33 

BO 

C7 

2C481 

OD 

CS 

25 

30 

03 

4C 

A2 

14 

A3 

29901 

26 

8D 

AB 

25 

20 

Bl 

00 

EO 

99 

2C501 

A9 

24 

AO 

F9 

20 

3E 

09 

20 

66 

2998: 

IE 

20 

4A 

EC 

20 

36 

09 

C9 

CF 

2C5B! 

25 

09 

C9 

53 

FO 

OB 

C9 

44 

7F 

29A01 

00 

DO 

14 

CO 

00 

FO 

10 

CO 

5A 

2C60: 

FO 

OE 

C9 

50 

FO 

21 

4C 

AB 

43 

29A81 

C9 

BO 

OC 

CO 

B7 

90 

OB 

A9 

59 

2C6B1 

15 

A9 

03 

8D 

C6 

25 

DO 

35 

90 

29B0! 

B6 

SD 

65 

25 

4C 

BA 

11 

4C 

7C 

2C70: 

A9 

00 

BD 

C6 

25 

AO 

ID 

A9 

4B 

29BBt 

7C 

09 

8C 

65 

25 

84 

IE 

20 

OB 

2C7a! 

25 

20 

3E 

09 

20 

72 

10 

20 

CE 

29C01 

SB 

OC 

AD 

AB 

25 

CD 

AC 

25 

2B 

2CB0: 

E6 

lA 

90 

21 

4C 

9E 

15 

A9 

A7 

29C8t 

90 

OA 

AC 

AC 

25 

88 

BC 

64 

OF 

2CB8: 

24 

AO 

F2 

20 

3E 

09 

20 

25 

F6 

29D0: 

25 

4C 

D4 

11 

8D 

64 

25 

85 

42 

2C90! 

09 

38 

E9 

30 

C9 

00 

BO 

03 

6E 

29D8S 

ID 

20 

22 

OB 

4C 

7C 

09 

AD 

CA 

2C981 

4C 

AB 

15 

C9 

08 

90 

03 

4C 

16 

29e0j 

64 

25 

C5 

ID 

DO 

17 

AD 

65 

DC 

2CA0i 

AB 

15 

80 

C6 

25 

A9 

24 

AO 

EA 

29EBt 

25 

C5 

IE 

DO 

10 

A9 

01 

BD 

C6 

2CAB1 

E6 

20 

3E 

09 

20 

84 

FE 

AD 

93 

29F0: 

64 

25 

85 

ID 

BD 

65 

25 

83 

13 

2CB0i 

C6 

25 

FO 

14 

C9 

03 

DO 

OD 

IE 

29FB: 

IE 

20 

22 

OB 

60 

AD 

64 

25 

FE 

2CB8! 

AD 

05 

C3 

18 

60 

07 

C3 

C9 

FB 

2A0O! 

85 

ID 

AD 

65 

25 

85 

IE 

60 

46 

2CC0i 

50 

DO 

05 

A9 

03 

20 

95 

FE 

73 

2A08: 

20 

Bl 

00 

8D 

BF 

25 

20 

Bl 

36 

2CCB: 

A5 

ID 

80 

C3 

25 

BD 

AO 

25 

EE 

2A101 

00 

8D 

CO 

25 

20 

Bl 

00 

80 

87 

2CD0: 

A5 

IE 

80 

C5 

25 

8D 

Al 

25 

59 

2A1B: 

CI 

25 

20 

Bl 

00 

C9 

28 

FO 

IE 

2CD8J 

A9 

01 

85 

10 

85 

IE 

A9 

8D 

4E 

2A201 

03 

4C 

88 

22 

AE 

6A 

12 

AD 

2D 

2CE0! 

20 

B4 

15 

A6 

ID 

BD 

66 

25 

55 

2A28: 

BF 

25 

DD 

6A 

12 

FO 

06 

CA 

33 

2CEBI 

8D 

AB 

25 

AA 

A9 

00 

9D 

00 

OA 

2A30! 

DO 

F5 

4C 

SB 

22 

AD 

CO 

25 

EA 

2CF01 

03 

CA 

A9 

20 

90 

00 

03 

CA 

72 

2A3ai 

OD 

76 

12 

FO 

02 

DO 

FO 

AD 

4D 

2CFB: 

10 

FA 

38 

20 

02 

20 

90 

56 

2B 

2A40: 

CI 

25 

DD 

B2 

12 

DO 

EB 

8E 

D6 

2000! 

AO 

9E 

25 

C9 

01 

DO 

23 

AO 

98 

2A4S! 

99 

25 

EO 

OB 

BO 

OC 

BA 

48 

92 

2008: 

AB 

25 

38 

EO 

9C 

25 

AA 

E8 

9D 

2A50: 

A9 

00 

48 

4C 

50 

21 

68 

SD 

15 

2D10S 

30 

14 

E8 

AO 

9D 

25 

29 

OC 

5F 

100  COMPUTEI  February  1986 


2D18: 

C9 

08 

FO 

OA 

BO 

27 

8A 

4A 

99 

2FD0S 

09 

C9 

00 

DO 

29 

CO 

00 

FO 

70 

32BB 

IE 

IB 

AO 

01 

91 

18 

4C 

6F 

E7 

2D20: 

FO 

04 

AA 

4C 

42 

15 

A2 

00 

B9 

2FDBT 

25 

CO 

C9 

BO 

21 

98 

18 

6D 

47 

3290 

lA 

A3 

6B 

B5 

IB 

AS 

6C 

85 

FE 

2D28: 

FO 

IB 

20 

4E 

OF 

AE 

9C 

25 

3C 

2FE0: 

BE 

25 

AB 

A9 

00 

20 

F2 

E2 

EO 

3298 

IC 

AO 

00 

20 

IE 

IB 

91 

IB 

DO 

2D30: 

CO 

CA 

CA 

EC 

AB 

25 

90 

CF 

95 

2FE8: 

20 

34 

ED 

A2 

00 

BD 

00 

01 

44 

32A0 

C8 

DO 

Fa 

E6 

IC 

A5 

IC 

C5 

AO 

2D38: 

AE 

AS 

25 

A9 

2A 

9D 

FF 

02 

ID 

2FF01 

FO 

06 

20 

30 

18 

ES 

DO 

F5 

4C 

32A8 

09 

90 

FO 

FO 

EE 

20 

17 

IB 

24 

2D40! 

CA 

DO 

FA 

FO 

13 

AO 

02 

Bl 

73 

2FF8i 

20 

B7 

00 

4C 

6F 

17 

A2 

00 

37 

32B0 

4C 

BB 

lA 

20 

17 

IB 

A9 

25 

OD 

2D48! 

19 

9D 

00 

03 

E8 

C8 

EC 

AB 

B3 

3000! 

BD 

80 

02 

FO 

06 

9D 

00 

03 

58 

32B8 

AO 

4A 

4C 

3E 

09 

60 

BO 

08 

AO 

2D50! 

25 

FO 

05 

cc 

9C 

25 

DO 

EF 

Fl 

3008! 

EB 

DO 

F5 

A9 

00 

9D 

00 

03 

E3 

32C0 

A9 

25 

AO 

27 

20 

3E 

09 

60 

36 

2D5Si 

A2 

00 

BD 

00 

03 

FO 

OB 

09 

BO 

3010: 

4C 

2F 

18 

20 

30 

IB 

20 

Bl 

3B 

32C8 

8D 

00 

02 

20 

6F 

09 

A9 

00 

29 

2D60! 

BO 

20 

B4 

15 

E8 

DO 

F3 

A5 

03 

3018: 

00 

20 

30 

18 

20 

Bl 

00 

20 

EF 

32D0 

85 

24 

85 

23 

A9 

04 

35 

29 

CS 

2D68: 

ID 

CD 

C3 

25 

FO 

05 

E6 

ID 

16 

3020: 

30 

18 

20 

Bl 

00 

4C 

69 

17 

DB 

32D8 

20 

80 

FE 

A9 

25 

AO 

31 

20 

16 

2D70: 

4C 

EO 

14 

A5 

IE 

CD 

C5 

25 

DE 

3028: 

AC 

9A 

25 

ec 

9C 

25 

A9 

00 

BF 

3ZE0 

3E 

09 

AD 

00 

02 

20 

DA 

FD 

AO 

20781 

FO 

OE 

E6 

IC 

A9 

01 

85 

ID 

07 

3030! 

91 

FB 

60 

AC 

9A 

25 

CO 

78 

92 

32Ea 

60 

20 

04 

IB 

20 

00 

BF 

CI 

F9 

2D80: 

A9 

BD 

20 

B4 

15 

4C 

EO 

14 

12 

3038: 

FO 

05 

91 

FB 

EE 

9A 

23 

60 

DO 

32F0 

62 

IB 

20 

00 

BF 

CO 

65 

IB 

38 

2D88! 

A9 

BD 

20 

B4 

15 

AD 

C6 

25 

7C 

3040: 

AD 

B5 

25 

38 

ED 

Bl 

25 

IB 

A5 

32F8 

BO 

OC 

4C 

FD 

lA 

20 

04 

IB 

96 

2D90: 

C9 

03 

DO 

03 

20 

25 

09 

A9 

2C 

3048: 

6D 

AO 

25 

BD 

BB 

25 

AD 

B6 

89 

3300 

20 

00 

BF 

ca 

71 

IB 

60 

AC 

60 

2D9a: 

00 

20 

95 

FE 

AD 

C6 

25 

DO 

41 

3050: 

25 

38 

ED 

B2 

25 

IB 

6D 

Al 

40 

3308 

A6 

25 

B9 

00 

02 

99 

01 

02 

BC 

2DA0: 

03 

20 

17 

IB 

AD 

AO 

25 

85 

DB 

3058: 

25 

8D 

BC 

25 

AD 

B2 

25 

CD 

E8 

3310 

88 

10 

F7 

AD 

A6 

25 

80 

00 

7D 

2Dfl8: 

ID 

AD 

Al 

25 

85 

IE 

20 

58 

CO 

3060: 

Al 

25 

BO 

03 

4C 

00 

19 

AD 

63 

3318 

02 

60 

20 

00 

BF 

CC 

7F 

IB 

E6 

2DB0! 

FC 

20 

22 

OB 

4C 

7C 

09 

4B 

35 

3068: 

Bl 

25 

CD 

AO 

25 

90 

4A 

AD 

5C 

3320 

60 

98 

48 

8A 

48 

20 

00 

BF 

11 

2DB8: 

AD 

C6 

25 

FO 

04 

68 

4C 

ED 

97 

3070! 

Bl 

25 

BD 

B7 

25 

AD 

B2 

25 

BA 

3328 

CA 

81 

IB 

4C 

38 

IB 

8D 

00 

C5 

2DC0i 

FD 

68 

4C 

2B 

IB 

A9 

00 

2C 

IC 

30781 

3D 

68 

25 

AD 

AO 

25 

aD 

B9 

BB 

3330 

02 

98 

48 

8A 

48 

20 

00 

BF 

Fl 

2DC8! 

C9 

2S 

30 

03 

AD 

61 

CO 

OD 

09 

3080! 

25 

AD 

Al 

25 

SD 

BA 

25 

20 

27 

3338 

CB 

77 

IB 

90 

OF 

AA 

68 

6B 

2B 

2DD0: 

CB 

25 

BD 

AF 

25 

A9 

00 

BD 

E2 

30881 

99 

16 

AD 

B7 

25 

CD 

B5 

25 

5D 

3340 

68 

68 

BA 

BD 

00 

02 

20 

17 

7E 

2DD8: 

BO 

25 

A5 

ID 

BD 

Bl 

25 

A5 

7E 

3090: 

FO 

08 

EE 

B7 

25 

EE 

B9 

25 

42 

334B 

IB 

4C 

ca 

lA 

68 

AA 

68 

A8 

71 

2DE0: 

IE 

BD 

B2 

25 

4C 

06 

16 

4C 

49 

3098! 

DO 

ED 

AD 

B8 

25 

CD 

66 

25 

11 

3350 

AD 

00 

02 

60 

02 

60 

00 

BE 

24 

2DES: 

7C 

09 

A9 

00 

2C 

C9 

25 

30 

FB 

30A0! 

FO 

14 

EE 

B8 

25 

EE 

BA 

25 

67 

3358 

01 

00 

02 

04 

01 

00 

B9 

00 

3B 

2DF0: 

03 

AD 

61 

CO 

OD 

CB 

25 

8D 

D3 

30  AS: 

AD 

Bl 

25 

8D 

B7 

25 

AD 

AO 

IB 

3360 

02 

00 

00 

01 

01 

01 

00 

02 

E5 

2DF3: 

AF 

25 

A9 

01 

BD 

BO 

25 

A5 

DB 

30B01 

25 

BD 

B9 

25 

DO 

Dl 

4C 

99 

90 

3368 

07 

00 

02 

C3 

04 

00 

00 

01 

EF 

2E00: 

ID 

BD 

Bl 

25 

A5 

IE 

BD 

B2 

4A 

30B8i 

19 

AD 

B5 

25 

BD 

B7 

25 

AD 

5D 

3370 

00 

00 

00 

00 

03 

00 

02 

00 

F2 

2E0B: 

25 

20 

41 

16 

AD 

AO 

25 

8D 

50 

30CO: 

BB 

25 

8D 

B9 

25 

AD 

B2 

25 

FF 

337  B 

BB 

00 

04 

01 

00 

02 

01 

00 

57 

2E10I 

B5 

25 

AD 

Al 

25 

BD 

B6 

25 

52 

30C8: 

8D 

B8 

25 

AD 

Al 

25 

8D 

BA 

15 

3380 

00 

00 

01 

01 

04 

01 

00 

02 

3D 

2Eia: 

20 

4B 

16 

AE 

Bl 

25 

CA 

EC 

A9 

30D0: 

25 

20 

99 

16 

AD 

B7 

25 

CD 

C4 

33BS 

01 

00 

00 

00 

4C 

C5 

lA 

20 

3D 

2E20: 

BS 

25 

BO 

13 

AE 

B2 

25 

CA 

3D 

30Da! 

Bl 

25 

FO 

08 

CE 

B7 

25 

CE 

68 

3390 

58 

FC 

20 

B4 

FE 

20 

00 

BF 

E6 

2E2B! 

EC 

B6 

25 

BO 

OA 

A9 

24 

AO 

38 

30E0: 

B9 

25 

DO 

ED 

AD 

BB 

25 

CD 

C8 

3398 

C5 

51 

IB 

BO 

EF 

AO 

00 

AD 

54 

2E30: 

62 

20 

3E 

09 

20 

3D 

IB 

AD 

Fl 

30EBi 

B6 

25 

FO 

CA 

EE 

B8 

25 

EE 

4C 

33A0 

00 

BE 

29 

OF 

BD 

00 

02 

B9 

F6 

2E3BI 

B3 

25 

85 

ID 

AD 

B4 

25 

85 

4A 

30FO! 

BA 

25 

AD 

B5 

25 

BD 

B7 

25 

FC 

33A8 

01 

BE 

99 

02 

02 

CB 

CC 

00 

5F 

2E40: 

IE 

4C 

7C 

09 

A9 

24 

AO 

CI 

BF 

30F8I 

AD 

BB 

25 

BD 

B9 

25 

DO 

Dl 

72 

33B0 

02 

DO 

F4 

C8 

ac 

00 

02 

A9 

89 

2E4B! 

20 

3E 

09 

4C 

52 

16 

A9 

24 

BC 

3100! 

4C 

99 

19 

AD 

Bl 

25 

CD 

AO 

4B 

3388 

2F 

8D 

01 

02 

20 

00 

BF 

C6 

Al 

2E50: 

AO 

99 

20 

3E 

09 

20 

88 

OD 

32 

310BI 

25 

90 

4A 

AD 

Bl 

25 

8D 

B7 

3A 

33C0 

55 

IB 

BO 

C8 

20 

00 

BF 

CB 

84 

2E5B: 

20 

25 

09 

AE 

86 

16 

DD 

B6 

EB 

3110: 

25 

AD 

B6 

25 

SD 

BB 

25 

AD 

EO 

33Ca 

71 

IB 

BO 

CO 

A9 

AF 

20 

ED 

OB 

2E60: 

ib 

FO 

06 

CA 

DO 

FB 

4C 

52 

C6 

31181 

AO 

25 

BD 

B9 

25 

AD 

BC 

25 

DF 

33D0 

FD 

20 

00 

BF 

CA 

58 

IB 

80 

DB 

2E68t 

16 

CA 

QA 

OA 

AA 

A9 

16 

48 

E4 

3120: 

BD 

BA 

25 

20 

99 

16 

AD 

B7 

D6 

33D8 

B3 

A9 

B9 

85 

FC 

A9 

04 

B5 

2F 

2E70S 

A9 

51 

4B 

BD 

BE 

16 

48 

BD 

F5 

3128! 

25 

CD 

B5 

25 

FO 

OB 

EE 

B7 

D6 

33E0 

FB 

AO 

00 

Bl 

FB 

DO 

08 

CB 

34 

2E7B! 

BD 

16 

48 

60 

68 

6B 

A5 

ID 

7D 

3130! 

25 

EE 

B9 

25 

DO 

ED 

AD 

BB 

BC 

33Ea 

Bl 

FB 

FO 

34 

4C 

09 

IC 

3D 

D4 

2EB0: 

8D 

B3 

25 

A5 

IE 

8D 

B4 

25 

45 

313Bi 

25 

CD 

B2 

25 

FO 

14 

CE 

B8 

77 

33F0 

99 

25 

29 

OF 

AA 

EB 

aE 

A6 

40 

2Eaa: 

60 

06 

00 

OB 

OA 

08 

15 

OD 

EE 

3140: 

25 

CE 

BA 

25 

AD 

Bl 

25 

SD 

9E 

33F8 

25 

C8 

Bl 

FB 

09 

80 

20 

ED 

92 

2E90: 

DB 

11 

F6 

10 

DD 

10 

37 

11 

AD 

3148: 

B7 

25 

AD 

AO 

25 

BD 

B9 

25 

87 

3400 

FD 

CB 

CC 

A6 

25 

DO 

F3 

A9 

9B 

2E98: 

OD 

11 

78 

16 

AD 

B9 

25 

C9 

98 

3150: 

DO 

Dl 

4C 

99 

19 

AD 

B5 

25 

C2 

3408 

BD 

20 

ED 

FD 

A9 

27 

18 

65 

5C 

2EfiO: 

33 

BO 

5B 

AD 

BA 

25 

C9 

C9 

DO 

3158: 

3D 

B7 

25 

AD 

BB 

25 

BD 

B9 

36 

3410 

FB 

85 

FB 

A5 

FC 

69 

00 

85 

C4 

2EAe! 

BO 

54 

AD 

B7 

25 

85 

ID 

AD 

CA 

3160: 

25 

AD 

B6 

25 

8D 

88 

2S 

AD 

31 

3418 

FC 

C9 

BB 

FO 

B4 

4C 

DE 

IB 

A7 

2EB0: 

Ba 

25 

85 

IE 

38 

20 

02 

20 

AB 

3168: 

BC 

25 

8D 

BA 

25 

20 

99 

16 

C2 

3420 

20 

00 

BF 

CC 

60 

IB 

A9 

24 

44 

2EBa: 

90 

45 

AO 

02 

AD 

9B 

25 

C9 

D2 

3170! 

AD 

B7 

25 

CD 

Bl 

25 

FO 

08 

25 

3428 

85 

FC 

A9 

34 

85 

FB 

20 

54 

BD 

2EC0: 

02 

DO 

09 

AC 

9C 

25 

Bl 

19 

34 

31781 

CE 

B7 

25 

CE 

B9 

25 

DO 

ED 

B3 

3430 

09 

20 

12 

09 

C9 

OD 

DO 

F9 

16 

2EC8: 

BD 

9C 

25 

C8 

A2 

00 

Bl 

19 

D5 

3180: 

AD 

BB 

25 

CD 

B2 

2S 

FO 

14 

89 

3438 

20 

58 

FC 

20 

22 

OB 

4C 

7C 

BA 

2ED0: 

9D 

00 

03 

E8 

C8 

CC 

9C 

25 

C2 

3188: 

CE 

B8 

25 

CE 

BA 

25 

AD 

B5 

8D 

3440 

09 

AD 

IB 

23 

DO 

01 

60 

A9 

23 

2ED8: 

DO 

F4 

A9 

00 

9D 

00 

03 

8E 

91 

31901 

25 

BD 

B7 

25 

AD 

BB 

25 

BD 

66 

344S 

25 

AO 

39 

20 

3E 

09 

A5 

ID 

13 

2EE0! 

9C 

25 

20 

IE 

17 

AD 

BO 

25 

BO 

319SS 

B9 

25 

DO 

Dl 

4C 

44 

IC 

A9 

AD 

3450 

BD 

AO 

25 

A5 

IE 

BD 

Al 

25 

36 

2EE8: 

DO 

03 

20 

OC 

17 

AD 

B9 

25 

3B 

31A0! 

24 

AO 

01 

20 

3E 

09 

20 

72 

28 

3458 

A9 

01 

85 

ID 

85 

IE 

AD 

SF 

87 

2EF0: 

B5 

ID 

AD 

BA 

25 

83 

IE 

18 

4C 

3lAa: 

10 

DO 

03 

4C 

7C 

09 

20 

E6 

9B 

3460 

25 

85 

IB 

AD 

60 

25 

B5 

IC 

B9 

2EFB! 

20 

02 

20 

20 

62 

20 

60 

AD 

ED 

31B0! 

lA 

90 

03 

4C 

40 

IB 

A9 

FF 

2B 

3468 

AO 

01 

Bl 

IB 

FO 

35 

85 

lA 

CA 

2F00: 

B9 

25 

as 

ID 

AD 

BA 

25 

85 

2F 

31BB: 

20 

2B 

IB 

A9 

FF 

20 

2B 

IB 

E5 

3470 

88 

Bl 

IB 

85 

19 

Bl 

19 

29 

30 

2F08! 

IE 

IB 

20 

02 

20 

90 

EF 

20 

E2 

31C0S 

A5 

OB 

20 

2B 

IB 

A5 

09 

20 

50 

3478 

03 

C9 

02 

DO 

26 

38 

20 

02 

76 

2F10: 

6E 

IE 

IB 

20 

02 

20 

A9 

00 

16 

31C8! 

2B 

IB 

AO 

32 

B9 

66 

25 

20 

90 

3480 

20 

A2 

00 

AC 

9C 

25 

Bl 

19 

62 

2F1BI 

A8 

91 

IB 

CB 

91 

IB 

4C 

FB 

AC 

31D0! 

2B 

IB 

88 

DO 

F7 

AD 

5F 

25 

08 

3488 

BD 

9C 

25 

ca 

Bl 

19 

<?D 

00 

3D 

2F20: 

16 

AD 

AF 

25 

30 

01 

60 

AD 

31 

31D8! 

85 

IB 

AD 

60 

25 

85 

IC 

AO 

98 

3490 

03 

E8 

ca 

CC 

9C 

25 

DO 

F4 

AA 

2F2B. 

9B 

25 

C9 

02 

FO 

01 

60 

AD 

FO 

31E0: 

01 

Bl 

IB 

FO 

16 

A5 

IB 

20 

40 

349S 

A9 

00 

9D 

00 

03 

BE 

9C 

25 

3A 

2F30S 

B9 

25 

38 

ED 

87 

25 

BD 

BD 

C5 

31E8: 

2B 

IB 

A5 

IC 

20 

2B 

IB 

88 

BA 

34A0 

20 

62 

20 

AS 

IB 

IS 

69 

02 

IE 

2F3BJ 

25 

AD 

BA 

25 

38 

ED 

B8 

25 

4E 

31F0: 

Bl 

IB 

20 

2B 

IB 

CB 

Bl 

IB 

24 

34A8 

35 

IB 

90 

02 

E6 

IC 

E6 

IE 

60 

2F40: 

BD 

BE 

25 

A2 

00 

BE 

9A 

25 

78 

31F8: 

20 

2B 

IB 

A5 

IB 

18 

69 

02 

02 

34B0 

A5 

IE 

C9 

C9 

DO 

B2 

A9 

01 

EE 

2F4BI 

BD 

00 

03 

9D 

BO 

02 

EB 

EC 

8A 

3200: 

as 

IB 

A5 

IC 

69 

00 

B5 

IC 

D6 

34B8 

85 

IE 

E6 

ID 

A5 

ID 

C9 

33 

82 

2F50: 

9C 

25 

DO 

F4 

A9 

00 

9D 

BO 

BB 

3208: 

A5 

IC 

C5 

6C 

DO 

Dl 

A9 

FF 

E6 

34C0 

DO 

A6 

AD 

AO 

25 

85 

ID 

AD 

22 

2F5a: 

02 

A9 

BO 

85 

BB 

A9 

02 

85 

80 

3210! 

20 

2B 

IB 

A5 

6B 

85 

IB 

A5 

SA 

34CB 

Al 

25 

85 

IE 

38 

20 

02 

20 

44 

2FtO : 

B9 

A9 

00 

85 

FB 

A9 

03 

85 

70 

32IB! 

6C 

as 

IC 

AO 

00 

Bl 

IB 

20 

BE 

34D0 

4C 

7C 

09 

20 

6E 

IE 

18 

20 

DD 

2FtB: 

FC 

20 

B7 

00 

20 

30 

18 

20 

56 

3220: 

2B 

IB 

CB 

DO 

FB 

E6 

IC 

A5 

43 

34DB 

02 

20 

A9 

00 

AB 

91 

IB 

ca 

OA 

2F70: 

Bl 

00 

C9 

00 

DO 

03 

4C 

25 

31 

3228: 

IC 

C5 

09 

90 

FO 

FO 

EE 

20 

7F 

34E0 

91 

IB 

20 

3E 

IC 

60 

A9 

23 

99 

2F7B! 

18 

C9 

40 

DO 

03 

4C 

10 

18 

EB 

3230! 

17 

IB 

4C 

BB 

lA 

A9 

24 

AO 

ac 

34E8 

AO 

EE 

20 

3E 

09 

A9 

00 

2C 

60 

2FB0: 

90 

EA 

C9 

43 

BO 

E6 

A2 

00 

B5 

3238: 

07 

20 

3E 

09 

20 

72 

10 

DO 

3C 

34F0 

C9 

25 

30 

03 

AD 

61 

CO 

OD 

3F 

2F8SS 

C9 

42 

DO 

02 

A2 

lA 

BE 

99 

CA 

3240: 

03 

4C 

7C 

09 

20 

FA 

lA 

90 

OB 

34FB 

CB 

25 

30 

08 

AD 

IB 

23 

49 

FE 

2F90: 

25 

20 

Bl 

00 

C9 

41 

90 

66 

9A 

3248: 

03 

4C 

40 

IB 

20 

IE 

IB 

C9 

74 

3500 

FF 

8D 

18 

23 

AD 

IB 

23 

C9 

4D 

2F9BI 

C9 

5B 

BO 

62 

38 

E9 

40 

18 

FO 

3250! 

FF 

DO 

60 

20 

IE 

IB 

C9 

FF 

E7 

350B 

00 

FO 

06 

A9 

CE 

20 

ED 

FD 

DA 

2FA0I 

6D 

99 

25 

C9 

33 

BO 

57 

18 

BO 

3258! 

00 

59 

20 

FA 

OA 

20 

IE 

IB 

57 

3510 

60 

ft9 

C6 

20 

ED 

FD 

20 

ED 

BS 

2FAB: 

6D 

BD 

25 

A2 

41 

C9 

IB 

90 

F3 

3260: 

85 

08 

20 

IE 

IB 

85 

09 

AO 

11 

3518 

FD 

60 

EE 

D2 

22 

20 

BB 

09 

BO 

2FB0I 

05 

A2 

42 

38 

E9 

lA 

18 

69 

57 

326S: 

32 

20 

IE 

IB 

99 

66 

25 

BB 

9C 

3520 

CE 

D2 

22 

AD 

00 

03 

FO 

4e 

02 

2FBa! 

40 

8D 

99 

25 

BA 

20 

30 

18 

6D 

3270: 

DO 

F7 

20 

IE 

IB 

C9 

FF 

FO 

12 

352B 

C9 

3D 

FO 

27 

AE 

C4 

oa 

DD 

CD 

2FC0S 

AD 

99 

25 

20 

30 

18 

20 

Bl 

D6 

327BS 

18 

85 

IB 

20 

IE 

IB 

85 

IC 

34 

3530 

C4 

oa 

FO 

OB 

CA 

DO 

FB 

A9 

D2 

2FC8I 

00 

BO 

33 

20 

4A 

EC 

20 

36 

38 

3280: 

20 

IE 

IB 

AO 

00 

91 

IB 

20 

86 

353B 

01 

4C 

52 

ID 

AD 

9C 

25 

C9 

46 

Febajory  1986    COMPUTEI     101 


3540: 

25 

BO 

33 

AO 

00 

A9 

03 

20 

A6 

3800 

25 

BD 

9C 

25 

60 

08 

A6 

ID 

09 

3AB8: 

00 

Bl 

FD 

91 

FB 

CS 

DO 

F9 

11 

354B5 

Bl 

OC 

20 

B7 

00 

DO 

EB 

A9 

B4 

3808 

CA 

86 

IB 

A9 

CB 

85 

IC 

18 

2A 

3AC0: 

E6 

FC 

E6 

FE 

A5 

FC 

C9 

26 

8F 

3550: 

00 

FO 

02 

A9 

02 

BD 

9B 

25 

74 

3810 

A9 

00 

A2 

08 

6A 

66 

IB 

90 

DD 

3  ACS: 

DO 

EF 

A9 

00 

85 

F2 

20 

65 

74 

3559: 

18 

20 

02 

20 

BO 

09 

AD 

IC 

3A 

3818 

03 

18 

65 

IC 

CA 

10 

F5 

85 

86 

3  ADO: 

D6 

4C 

D2 

07 

00 

00 

04 

04 

A7 

3560: 

23 

BD 

9D 

25 

4C 

6D 

ID 

AO 

B8 

3B20 

IC 

A6 

IE 

CA 

BA 

IB 

65 

IB 

53 

3AD8: 

05 

05 

06 

06 

07 

07 

04 

04 

92 

35(bB: 

00 

Bl 

19 

29 

FC 

SD 

9D 

25 

73 

3828 

85 

IB 

A5 

IC 

69 

00 

B5 

IC 

OB 

3AE0! 

05 

05 

06 

06 

07 

07 

04 

04 

9A 

3570: 

20 

62 

20 

20 

3E 

IC 

60 

AE 

5B 

3B30 

06 

IB 

26 

IC 

A5 

IC 

6D 

60 

C9 

3AE8! 

05 

05 

06 

06 

07 

07 

00 

80 

17 

357B1 

A6 

25 

CA 

CA 

CA 

CA 

BD 

00 

82 

3838 

25 

85 

IC 

AO 

01 

Bl 

IB 

DO 

FF 

3AF01 

00 

80 

00 

80 

00 

SO 

26 

AB 

BB 

3580! 

02 

C9 

45 

DO 

78 

EB 

BD 

00 

F6 

3840 

03 

28 

18 

60 

AA 

88 

Bl 

IB 

3B 

3AFBt 

28 

AB 

28 

AB 

28 

AB 

50 

DO 

90 

35Be> 

02 

8D 

AB 

25 

E8 

BD 

00 

02 

5F 

3848 

85 

19 

86 

lA 

28 

90 

14 

Bl 

91 

3B00: 

50 

DO 

50 

00 

50 

00 

00 

01 

BO 

3590: 

3B 

E9 

30 

80 

9A 

25 

E8 

BD 

69 

3850 

19 

29 

03 

BD 

9B 

25 

Bl 

19 

BE 

3B08! 

02 

02 

03 

03 

04 

3C 

22 

3C 

22 

359B1 

00 

02 

38 

E9 

30 

AE 

9A 

25 

BF 

385B 

29 

FC 

80 

9D 

25 

C8 

Bl 

19 

FO 

3B10! 

22 

CO 

E7 

A9 

E7 

SI 

E9 

2D 

AS 

35fi0: 

FO 

06 

18 

69 

OA 

CA 

DO 

FA 

B6 

3860 

SO 

9C 

25 

5s 

60 

20 

6E 

IE 

65 

3BlBi 

22 

96 

EE 

4E 

54 

46 

00 

2C 

EF 

35  AS: 

8D 

99 

25 

AD 

AB 

25 

C9 

2D 

72 

3S6B 

AD 

9B 

25 

C9 

02 

FO 

32 

EE 

FE 

3B201 

40 

40 

41 

41 

41 

42 

41 

43 

DB 

35B01 

FO 

4C 

A2 

00 

AO 

00 

BD 

00 

7B 

3870 

9C 

25 

EE 

9C 

25 

AO 

00 

AS 

71 

3B28: 

41 

44 

41 

45 

41 

46 

41 

47 

B9 

35BBI 

02 

C9 

45 

FO 

08 

E8 

C9 

2E 

F3 

3878 

OB 

91 

IB 

C8 

A5 

09 

91 

IB 

DO 

3B30! 

41 

48 

41 

49 

41 

4A 

41 

4B 

17 

35C0: 

FO 

F4 

CB 

DO 

Fl 

88 

8C 

AB 

7D 

3BS0 

SB 

AO 

9B 

25 

OD 

90 

25 

91 

21 

3B38S 

41 

4C 

41 

40 

41 

4E 

41 

4F 

74 

35C0: 

25 

AD 

99 

25 

3B 

ED 

AB 

25 

AC 

3388 

08 

C8 

AD 

9C 

25 

91 

08 

CB 

F6 

3B40: 

41 

50 

41 

51 

41 

52 

41 

53 

Dl 

35D0I 

BD 

99 

25 

A2 

01 

AO 

01 

BD 

81 

3890 

A2 

00 

BO 

00 

03 

91 

08 

CB 

41 

3B4B: 

41 

54 

41 

S5 

41 

56 

41 

57 

2F 

35DB! 

00 

02 

Ea 

C9 

2E 

FO 

FB 

C9 

6E 

3898 

E8 

CC 

9C 

25 

DO 

F4 

4C 

Fl 

7B 

3B50: 

41 

58 

41 

59 

41 

5A 

42 

41 

74 

35E0! 

45 

FO 

06 

99 

00 

02 

CB 

DO 

EE 

38A0 

20 

20 

20 

21 

EE 

A6 

25 

EE 

2C 

3B58! 

42 

42 

42 

43 

42 

44 

42 

45 

E9 

35EB1 

EE 

A9 

30 

AE 

99 

25 

99 

OO 

BA 

38A8 

A6 

25 

38 

AD 

A6 

25 

6D 

9C 

08 

3660: 

42 

46 

42 

47 

42 

48 

42 

49 

47 

35F0: 

02 

C8 

CA 

DO 

F9 

A9 

00 

99 

05 

3880 

25 

80 

9C 

25 

AC 

A6 

25 

AD 

F4 

3B6B: 

42 

4A 

42 

4B 

42 

4C 

42 

4D 

A4 

35FBi 

00 

02 

BC 

A6 

25 

60 

CE 

99 

CI 

38BB 

9C 

25 

91 

OB 

A2 

00 

CB 

BD 

D7 

3B70! 

42 

4E 

42 

4F 

42 

50 

42 

51 

02 

3600: 

25 

A2 

00 

AO 

00 

BD 

00 

02 

AA 

3BC0 

00 

03 

91 

08 

CB 

EB 

CC 

9C 

C4 

3B7B: 

42 

52 

42 

53 

42 

54 

42 

55 

5F 

360BI 

E8 

C9 

2E 

FO 

FB 

C9 

45 

FO 

9A 

38C8 

25 

DO 

F4 

AO 

00 

A5 

08 

91 

EO 

3BB0: 

42 

56 

42 

57 

42 

5B 

2A 

45 

78 

3610! 

06 

99 

SO 

02 

CB 

DO 

EE 

A9 

27 

3800 

IB 

CB 

A5 

09 

91 

IB 

BS 

AD 

FD 

3B8B! 

52 

52 

4F 

52 

2A 

C5 

D8 

C9 

AF 

361B: 

00 

99 

BO 

02 

A9 

2E 

8D 

00 

3C 

3SDB 

9B 

25 

OD 

9D 

25 

91 

08 

CB 

24 

3B90: 

D4 

BA 

AO 

CI 

D2 

C5 

AO 

09 

19 

3620! 

02 

AE 

99 

25 

A9 

30 

90 

00 

08 

38E0 

AD 

A6 

25 

91 

08 

CB 

A2 

02 

3A 

3B9BS 

CF 

D5 

AO 

D3 

D5 

D2 

C5 

AO 

E3 

3628: 

02 

CA 

DO 

FA 

A2 

00 

AC 

99 

lA 

3BE8 

BD 

FE 

01 

91 

08 

C8 

E8 

EC 

53 

3BA0! 

AB 

D9 

AF 

CE 

A9 

BF 

00 

D3 

E4 

3630! 

25 

C8 

BD 

80 

02 

99 

00 

02 

99 

38F0 

A6 

25 

DO 

F4 

A5 

OB 

18 

60 

52 

3BAS: 

DO 

C5 

C5 

C4 

C3 

CI 

CC 

C3 

80 

3638: 

FO 

04 

E6 

CB 

DO 

F4 

SC 

A6 

El 

SBFB 

9C 

25 

90 

06 

A5 

09 

C9 

BB 

1 1 

3BB0: 

00 

D3 

DO 

C5 

C5 

C4 

C3 

CI 

ID 

3640! 
3648: 
3650: 
36581 

3660: 

25 
29 
61 
25 
F2 

60 
A9 
25 
E5 
E2 

20 
00 
39 
09 
20 

6F 
85 
E5 
20 
34 

09 
28 

08 
5C 
ED 

A9 
85 
AS 
IE 
A9 

04 
24 
AO 
60 
01 

B5 
AD 
62 
20 
85 

CE 
59 
BC 
30 
E3 

3900 
3908 
3910 
3918 

■  FO 
:  85 

!  60 

!   IB 

OF 
08 
A9 
A9 

A5 
A5 
00 
24 

08 
09 
AS 
AO 

IB 
69 
91 
7B 

6D 
00 
16 
20 

9C 
85 
CS 
3E 

25 

09 
91 
09 

BS 
E3 
C3 
F2 

3BBa: 

3BC0! 
3BCa: 
3BD0! 
3BD8! 

CC 
D6 
C9 
CI 
D3 

C3 
C9 
CE 
D2 
05 

AO 
CE 
00 
C5 
D2 

C2 
AO 
CE 
AO 
C5 

D9 
CD 
C5 
D9 
AO 

AO 
CI 
D7 
CF 
AS 

CB 

D2 
BA 
D5 
09 

C5 
D4 
AO 
AO 
AF 

75 
£8 
6B 
F9 
70 

3668: 

FC 

A9 

00 

85 

FB 

20 

54 

09 

28 

3920 

A5 

ID 

BD 

64 

25 

A5 

IE 

BD 

2E 

3BE0: 

CE 

A9 

BF 

00 

D7 

C9 

C4 

D4 

65 

3670: 

60 

AO 

01 

Bl 

IB 

FO 

E7 

A9 

86 

3928 

65 

25 

A2 

FD 

9A 

4C 

7C 

08 

Dl 

3BES! 

C8 

BA 

00 

C7 

CF 

D4 

CF 

BA 

IB 

3678! 

00 

91 

IB 

88 

91 

IB 

Bl 

19 

AA 

3930 

BA 

BE 

AE 

25 

A2 

00 

AO 

00 

22 

3BF0: 

00 

D2 

C5 

C3 

CI 

CC 

C3 

D5 

AF 

3680: 

29 

03 

C9 

02 

00 

09 

CB 

Bl 

89 

3938 

BD 

00 

03 

C9 

2B 

DO 

01 

C8 

D5 

3BF8: 

CC 

CI 

04 

C9 

CF 

CE 

AO 

C9 

42 

3688: 

19 

AS 

Bl 

19 

4C 

8F 

IE 

C8 

19 

3940 

C9 

29 

DO 

01 

88 

9D 

00 

03 

C9 

3C00! 

D3 

AO 

CF 

00 

D3 

CI 

06 

C5 

9D 

3690  s 

Bl 

19 

B5 

FB 

18 

65 

19 

BD 

A2 

3948 

E8 

EC 

9C 

25 

DO 

EA 

CO 

00 

04 

3C08! 

BA 

00 

CC 

CF 

CI 

C4 

BA 

00 

OB 

3698: 

Bl 

IE 

A5 

19 

BD 

B4 

IE 

A5 

CC 

3950 

FO 

03 

4C 

BB 

22 

A9 

00 

4B 

OE 

3C10! 

C6 

CF 

D2 

CO 

CI 

D4 

BA 

AO 

BE 

36  AGs 

lA 

BD 

B5 

IE 

69 

00 

BD 

B2 

2F 

3958 

A9 

00 

B5 

B8 

A9 

03 

85 

B9 

F9 

3C18: 

AO 

CC 

C5 

C6 

D4 

AC 

AO 

C3 

97 

36Aei 

IE 

A5 

09 

38 

ED 

B2 

IE 

AA 

53 

3960 

20 

Bl 

00 

90 

51 

C9 

20 

FO 

55 

3C20: 

C5 

CE 

04 

C5 

D2 

AC 

AO 

CF 

80 

36B0: 

E8 

AO 

00 

B9 

FF 

FF 

99 

FF 

88 

396B 

4D 

C9 

2B 

FO 

49 

C9 

2E 

FO 

27 

3C28: 

02 

AO 

02 

C9 

C7 

CS 

04 

AO 

D4 

36BSI 

FF 

CS 

DO 

F7 

EE 

82 

IE 

EE 

5E 

3970 

45 

C9 

50 

FO 

25 

C9 

28 

FO 

A2 

3C30: 

CA 

D5 

D3 

D4 

C9 

C6 

09 

BF 

2B 

36C0: 

B5 

IE 

CA 

DO 

EE 

A5 

OS 

3B 

4C 

3978 

15 

C9 

41 

FO 

OB 

C9 

42 

FO 

14 

3C38: 

00 

C6 

CF 

D2 

CO 

CI 

D4 

BA 

63 

36CBS 

ES 

FB 

BS 

08 

A5 

09 

E9 

00 

7D 

3980 

07 

C9 

40 

FO 

OF 

4C 

88 

22 

DC 

3C40! 

AO 

AO 

A3 

AO 

CF 

C6 

AO 

C4 

4F 

36D0! 

B5 

09 

AD 

5F 

25 

B5 

FD 

AD 

D6 

3988 

20 

48 

IF 

4C 

B6 

21 

A9 

01 

54 

3C48: 

CS 

C3 

C9 

CD 

CI 

CC 

AO 

OO 

FD 

36DBI 

60 

25 

85 

FE 

AO 

01 

Bl 

FD 

C9 

3990 

48 

4C 

5D 

21 

20 

05 

12 

4C 

70 

3C50i 

CC 

CI 

C3 

C5 

D3 

BA 

00 

BD 

BB 

36E0: 

FO 

22 

38 

88 

Bl 

FD 

E5 

19 

48 

3998 

B6 

21 

20 

Bl 

00 

C9 

49 

FO 

78 

3C58! 

DO 

D2 

C5 

D3 

D3 

AO 

02 

C5 

70 

36E8i 

80 

99 

25 

C8 

Bl 

FD 

E5 

lA 

IF 

39A0 

03 

4C 

88 

22 

A9 

AE 

AO 

21 

45 

3C60! 

D4 

D5 

D2 

CE 

00 

DO 

02 

CF 

BB 

36F0! 

OD 

99 

25 

90 

OF 

BS 

Bl 

FD 

F3 

39A8 

20 

F9 

EA 

20 

Bl 

00 

4C 

B6 

E5 

3C68! 

C3 

C5 

D3 

03 

C9 

CE 

C7 

AO 

A5 

36FB: 

38 

E5 

FB 

91 

FD 

CB 

Bl 

FD 

08 

39B0 

21 

82 

49 

OF 

DA 

Al 

20 

4A 

56 

3C70: 

C4 

CI 

04 

CI 

AO 

D4 

02 

CI 

32 

3700! 

E9 

00 

91 

FO 

C8 

FO 

03 

ce 

4E 

39B8 

EC 

20 

B7 

00 

FO 

78 

A2 

02 

51 

3C78: 

CE 

D3 

C6 

C5 

D2 

00 

CE 

CF 

86 

370BI 

DO 

D4 

E6 

FE 

CB 

A5 

FE 

C5 

81 

39C0 

C9 

2B 

FO 

35 

ES 

C9 

2D 

FO 

OE 

3CB0: 

D4 

AO 

C5 

CE 

CF 

D5 

C7 

CB 

5F 

3710: 

6C 

DO 

CB 

60 

A9 

23 

AO 

8A 

OE 

39C8 

30 

EB 

C9 

2A 

FO 

2B 

E8 

C9 

39 

3C8S! 

AO 

D2 

CF 

CF 

CD 

AO 

04 

CF 

67 

3718: 

20 

3E 

09 

20 

25 

09 

C9 

59 

83 

39D0 

2F 

FO 

26 

E8 

C9 

5E 

FO 

21 

35 

3C90I 

AO 

C5 

CE 

D4 

C5 

D2 

AO 

C4 

71 

3720J 

DO 

03 

4C 

00 

C6 

4C 

7C 

09 

AA 

3908 

C9 

29 

FO 

03 

4C 

88 

22 

68 

F9 

3C9B! 

CI 

D4 

CI 

00 

CD 

CF 

D6 

C5 

80 

3728! 

AD 

A9 

25 

B5 

ID 

AD 

AA 

25 

EE 

39E0 

FO 

14 

C9 

01 

FO 

07 

48 

20 

6E 

3CA0J 

AO 

C3 

05 

D2 

D3 

CF 

02 

AO 

66 

3730: 

85 

IE 

IB 

20 

02 

20 

AD 

AB 

B5 

39E8 

54 

22 

4C 

DC 

21 

E6 

B8 

DO 

4C 

3CAB: 

D4 

CF 

AO 

D4 

CF 

DO 

AO 

CC 

BO 

373B1 

25 

ao 

9B 

25 

AD 

AD 

25 

BD 

5E 

39F0 

02 

E6 

B9 

4C 

B6 

21 

4C 

53 

40 

3CB0: 

C5 

C6 

D4 

AO 

CF 

C6 

AO 

CE 

OC 

3740! 

90 

25 

AD 

AC 

25 

BD 

9C 

25 

05 

39F8 

12 

S6 

06 

68 

48 

A8 

B9 

03 

B8 

3CB8: 

C5 

D7 

AO 

DO 

CF 

D3 

C9 

D4 

61 

37481 

4C 

88 

22 

48 

A5 

ID 

8D 

A9 

2E 

3A0O 

23 

DD 

03 

23 

90 

10 

20 

54 

69 

3CC0: 

C9 

CF 

CE 

00 

CD 

CF 

06 

CS 

OD 

37501 

25 

A5 

IE 

80 

AA 

25 

AD 

9B 

38 

3A0B 

22 

A6 

06 

68 

48 

AB 

B9 

03 

D9 

3CCB: 

AO 

C3 

D5 

D2 

D3 

CF 

D2 

AO 

8E 

375BI 

25 

eo 

AB 

25 

AD 

9D 

25 

BD 

40 

3A10 

23 

DD 

03 

23 

BO 

FO 

20 

72 

IC 

3CD0! 

D4 

CF 

AO 

C2 

CF 

D4 

D4 

CF 

33 

37601 

AD 

25 

AD 

9C 

25 

8D 

AC 

25 

4C 

3A18 

EB 

A5 

A2 

48 

A5 

Al 

48 

A5 

AE 

3CD8: 

CD 

AO 

D2 

C9 

C7 

C8 

D4 

AO 

03 

3768: 

68 

E9 

41 

30 

BB 

FO 

06 

C9 

28 

3A20 

AO 

4B 

A5 

9F 

48 

A5 

9E 

48 

04 

3CE0! 

CF 

C6 

AO 

C2 

CC 

CF 

C3 

CB 

2C 

3770! 

02 

BO 

B5 

A9 

lA 

85 

ID 

20 

9E 

3A28 

A5 

9D 

48 

A5 

06 

48 

4C 

5D 

81 

3CE8: 

00 

DO 

D2 

C9 

CE 

D4 

C9 

CE 

B8 

3778! 

Bl 

00 

E9 

40 

30 

AA 

FO 

A8 

B7 

3A30 

21 

FO 

58 

4C 

69 

EA 

68 

4B 

51 

3CF0i 

C7 

AE 

AE 

AE 

00 

D3 

CC 

CF 

72 

37B0I 

C9 

IB 

BO 

A4 

18 

65 

ID 

C9 

SS 

3A38 

FO 

06 

20 

54 

22 

4C 

33 

22 

BA 

3CFB: 

D4 

AO 

A3 

00 

DO 

D2 

C9 

CE 

AC 

37881 

33 

BO 

90 

83 

ID 

20 

Bl 

00 

95 

3A40 

6B 

20 

34 

ED 

AO 

00 

B9 

00 

CE 

3000! 

04 

AO 

04 

CF 

BA 

AO 

AO 

D3 

12 

3790: 

BO 

96 

20 

4A 

EC 

20 

36 

09 

03 

3A4B 

01 

99 

00 

02 

FO 

03 

CB 

DO 

B9 

3D0B! 

C3 

D2 

C5 

C5 

CE 

AC 

AO 

C4 

50 

379BI 

C9 

00 

DO 

8C 

CO 

00 

FO 

88 

3F 

3A50 

F5 

8C 

A6 

25 

4C 

74 

ID 

68 

EO 

3010! 

C9 

D3 

CB 

AO 

CF 

D2 

AO 

DO 

C3 

37  AC! 

CO 

C9 

BO 

B4 

84 

IE 

38 

20 

60 

3A5B 

85 

FB 

68 

85 

FC 

68 

85 

07 

BF 

3018: 

D2 

C9 

CE 

D4 

C5 

D2 

BF 

00 

8E 

37A81 

02 

20 

90 

07 

AD 

9B 

25 

C9 

92 

3A60 

68 

85 

A5 

68 

BS 

A6 

68 

85 

C2 

3020 1 

C6 

C9 

CC 

C5 

CE 

CI 

CD 

C5 

4S 

37B0l 

01 

DO 

03 

4C 

25 

IF 

AO 

02 

El 

3A6S 

A7 

68 

S5 

AS 

68 

85 

A9 

66 

IB 

3D2B! 

BA 

00 

CE 

CF 

AO 

C5 

D2 

D2 

6B 

37B8! 

A2 

00 

Bl 

19 

C9 

2A 

FO 

F3 

OD 

3A70 

85 

AA 

45 

A2 

H5 

AB 

AS 

07 

52 

3D30! 

CF 

D2 

D3 

00 

C5 

D2 

D2 

CF 

BO 

37C0! 

Bl 

19 

90 

00 

02 

CB 

EB 

CC 

D3 

3A78 

OA 

AB 

AS 

FC 

48 

A5 

FB 

48 

B9 

3D3Bi 

D2 

AO 

A3 

00 

D2 

CS 

C3 

CI 

AF 

37CB1 

9C 

25 

DO 

F4 

A9 

00 

9D 

00 

CO 

3A80 

B9 

OB 

23 

48 

B9 

OA 

23 

48 

02 

3D40! 

CC 

C3 

D5 

CC 

CI 

D4 

C9 

CE 

50 

37D0I 

02 

A5 

BB 

48 

AS 

B9 

48 

AO 

8A 

3AB8 

A5 

90 

60 

AE 

AE 

25 

9A 

A9 

17 

3D4B! 

C7 

AE 

AE 

AE 

00 

CE 

CF 

D4 

C2 

37DBI 

00 

A9 

02 

20 

Bl 

OC 

68 

85 

86 

3A90 

07 

8D 

A6 

25 

AO 

00 

B9 

83 

OF 

3050: 

AO 

CI 

AO 

D3 

DO 

C5 

C5 

C4 

CA 

37E0! 

B9 

68 

B5 

68 

AD 

A9 

25 

85 

66 

3A9B 

23 

99 

00 

02 

CS 

CO 

07 

DO 

4D 

3058: 

C3 

CI 

CC 

C3 

AO 

C6 

C9 

CC 

7B 

37E8I 

ID 

AD 

AA 

25 

85 

IE 

18 

20 

ED 

3AA0 

F5 

A9 

00 

99 

00 

02 

60 

A9 

86 

3D60! 

C5 

00 

FE 

FE 

FE 

FE 

BA 

FE 

F5 

37F0: 

02 

20 

AD 

AB 

25 

BD 

9B 

25 

94 

3AAB 

00 

85 

FB 

A9 

03 

85 

FD 

A9 

6C 

37FBI 

AD 

AD 

25 

8D 

90 

25 

AD 

AC 

BO 

3AB0 

08 

85 

FC 

A9 

20 

S5 

FE 

AO 

7A 

€ 

102    COMPUTEI     Febajory  1986 


Telecomputing  Today 


Arlan  R.  Levitan 


Gadgets  For  Better  Telecomputing 


I've  got  a  confession  to  make,  I'm  a 
hopeless  gadget  freak.  Every  time  I 
see  a  new  piece  of  equipment  that  I 
suspect  will  make  my  telecomput- 
ing time  more  productive,  I  go  for  it. 

Friends  who  drop  in  for  the 
first  time  invariably  comment  on 
the  number  of  phones  in  our  com- 
puter room.  So  did  the  phone  com- 
pany technician  who  installed 
them.  I  still  remember  the  puzzled 
look  on  her  face.  "Four  phone 
lines?  "  she  asked.  "I  don't  mean  to 
be  nosy,  but  what  are  you  going  to 
do  with  them?" 

"One  for  me  and  three  for  the 
computers,"  I  kidded.  "They  get 
kinda  lonely  during  the  day  and 
like  to  call  their  friends.  You  saw 
WarGames,  didn't  you?" 

"Uh...sure,"  she  replied,  prob- 
ably wondering  if  I  was  a  bookie,  a 
psychopathic  telephone  solicitor,  or 
just  a  plain  nut. 

All  kidding  aside,  a  dedicated 
phone  line  for  your  computer  can 
be  a  real  plus,  especially  if  you  want 
to  receive  ordinary  phone  calls 
while  you're  online.  It  can  also  help 
segregate  billing  for  your  computer- 
related  calls  from  your  regular 
phone  use. 

If  you  do  take  voice  calls  dur- 
ing your  online  sessions,  jamming 
the  phone  handset  between  your 
shoulder  and  tilted  head  while 
hunched  over  a  keyboard  for  an 
hour  may  leave  you  looking  like  a 
computerized  Quasimodo.  The  so- 
lution? A  gadget,  of  course.  A 
hands-free  phone  device,  such  as  a 
speakerphone  or  lightweight  NASA- 
style  headset,  allows  comfortable 
conversation  while  you  pound 
away  at  your  keyboard. 

Surges  And  Spikes 

Practically  everyone  knows  about 
surge  protectors  and  the  potential 
dangers  of  power-line  spikes.  Yet, 
although  many  hobbyists  have  tak- 
en steps  to  protect  their  equipment 
against  surges  from  AC  power  out- 


lets, the  danger  of  surges  traveling 
over  telephone  lines  into  computer 
equipment  is  usually  ignored.  Tele- 
phone line  surges  are  relatively 
rare,  but  my  buddy  Fred  discovered 
that  all  of  his  AC  surge  protection 
was  for  naught  when  a  nearby 
lightning  strike  sent  some  particu- 
larly nasty  spikes  into  his  modem, 
which  was  connected  to  his  Atari 
system.  Every  piece  of  equipment 
in  the  loop  was  damaged. 

At  $12.95,  Radio  Shack's  tele- 
phone line  surge  protector  (Part 
#43-102)  is  reasonably  priced  in- 
surance. It  installs  between  your 
modular  wall  plug  and  modem.  For 
those  who  wish  to  add  another  lev- 
el of  surge  isolation.  Data  Spec 
(20120  Plummer  Street,  Chats- 
worth,  CA  91311),  a  manufacturer 
of  telecomputing-related  goodies, 
also  sells  an  RS-232  surge  protector 
(Part  #RS232SP-300)  that  installs 
between  your  modem  and  com- 
puter using  a  standard  25-pin  RS- 
232  connector. 

Many  terminal  programs  pro- 
vide a  printer  on/off  feature  for 
those  who  wish  to  keep  a  paper 
record  of  their  telecomputing  ses- 
sions. This  feature  is  of  limited  val- 
ue if  you  use  transmission  speeds 
faster  than  300  baud.  Not  many 
printers  can  keep  up  with  sustained 
data  rates  of  120  characters  a  sec- 
ond or  more.  When  the  printer  gets 
behind,  the  terminal  program 
usually  sends  an  XOFF  (CTRL-S) 
character  to  the  remote  system, 
halting  the  flow  of  incoming  data 
until  the  printer  catches  up.  Then  it 
sends  an  XON  (CTRL-Q)  character 
to  resume  data  transmission.  The 
XON/XOFF  cycle  goes  on  ad  nau- 
seum,  putting  a  damper  on  effective 
transmission  speed. 

A  printer  buffer  sitting  be- 
tween your  system  and  printer  will 
happily  gobble  up  all  the  data  in- 
tended for  posterity  and  control  the 
printer.  Printer  buffers  are  available 


with  varying  amounts  of  memory 
ranging  from  8K  to  2  megabytes. 
The  most  cost-effective  approach, 
for  those  handy  with  a  screwdriver, 
is  to  buy  an  8K  buffer  that  is  user- 
expandable  to  at  least  128K.  The 
chips  to  upgrade  from  8K  to  128K 
can  be  bought  for  less  than  $15. 
Even  if  you  prefer  to  save  the  in- 
coming data  to  disk  first  and  print  it 
out  later,  a  printer  buffer  can  cut  the 
amount  of  time  that  your  computer 
is  tied  up  by  90  percent  or  more. 

Hi,  BOBs 

People  who  own  several  computers 
often  use  RS-232  switch  boxes  to 
toggle  modems  between  machines 
and  transport  data  between  sys- 
tems with  incompatible  disk  for- 
mats. A  carefully  thought-out 
switching  system  can  eliminate  the 
drudgery  of  manually  swapping 
multiple  RS-232  cables,  allowing 
changes  in  cabling  with  a  flick  of 
the  wrist.  There  are  dozens  of  dif- 
ferent switch  boxes  of  varying  com- 
plexity and  function.  The  catalogs 
of  Black  Box  Corporation  (Box 
12800,  Pittsburgh,  PA  15241),  MFJ 
Enterprises  (921  Louisville  Road, 
Starkville,  MS  39759),  and  Data 
Spec  will  give  those  who'd  rather 
switch  than  fight  a  good  idea  of 
what's  available. 

If  you  like  to  make  your  own 
cables,  these  companies  also  sell 
some  handy  diagnostic  tools  called 
Break  Out  Boxes  (BOBs).  BOBs  are 
typically  installed  in  an  RS-232  ca- 
ble link  that  is  having  problems. 
The  best  BOBs  have  Light  Emitting 
Diodes  (LEDs)  to  indicate  the  elec- 
trical status  of  each  line  in  the  link, 
plus  jumpers  for  testing  the  effect  of 
wiring  changes  before  whipping 
out  the  soldering  iron.  © 
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The  Hidden  Numbers  Behind  Strings 


We  dropped  a  tidbit  in  last  month's 
column  that  we  promised  to  explain 
later — that  the  alphabetic  charac- 
ters on  a  monitor  screen  are  merely 
an  outward  illusion  displayed  by 
computers  for  our  convenience.  In- 
ternally, computers  deal  with  num- 
bers and  only  with  numbers.  This 
has  some  important  implications 
when  you  work  with  character 
strings  in  BASIC. 

Consider  a  short  routine  that 
asks  a  user  to  answer  either  "yes" 
or  "no"  to  a  question,  and  which 
then  branches  to  another  part  of  the 
program  depending  on  the  re- 
sponse. Here's  how  it  might  look: 
10  DIM  A$(1):REM  This  line  for  Atari 

only 
20  PRINT  "DO  YOU  WISH  TO 

CONTINUE  (Y/N)"; 
30  INPUT  A$ 

40  IF  A$  =  "Y"  THEN  GOTO  60 
50  IF  AS  =  "N"  THEN  END 
60  PRINT  'Trogram  continues  here..." 

There  are  a  couple  of  problems 
with  this  routine  that  aren't  imme- 
diately apparent.  At  first  glance,  it 
seems  solid  enough:  Line  20  asks 
the  question;  line  30  fetches  and 
stores  the  keypress  in  the  string 
variable  A$;  line  40  branches  to  line 
60  if  the  keypress  was  the  letter  Y; 
and  line  50  ends  the  program  if  the 
keypress  was  the  letter  N. 

One  problem  is  a  design  flaw 
that  doesn't  have  anything  to  do 
with  character  strings  per  se:  The 
routine  doesn't  check  for  any  key- 
presses besides  Y  or  N.  If  the  user 
types  another  key  by  mistake — or 
on  purpose,  just  to  be  mischie- 
vous— both  IF-THEN  tests  fail  and 
the  program  drops  through  to  line 
60  as  if  Y  were  pressed.  There  are 
various  approaches  to  this  problem, 
but  one  quick  solution  is  to  insert 
line  55  GOTO  20  so  the  question 
repeats  after  each  invalid  response. 

The  Computer  Is  Blind 

The  main  problem  we're  concerned 

about,  however,  has  to  do  with  the 
way  computers  interpret  alphabetic 


characters.  Lines  40  and  50  check 
for  Y  or  N.  But  what  happens  if  the 
user  presses  a  lowercase  y  or  n?  This 
can  easily  happen  if  the  CAPS 
LOCK  key  or  its  equivalent  isn't 
pressed  when  the  program  runs. 
Since  this  routine  doesn't  check  for 
y  or  n,  both  IF-THEN  tests  fail  and 
the  program  drops  through  to  line 
60  as  if  Y  were  pressed — which 
may  not  have  been  the  user's  inten- 
tion at  all.  Or,  if  you  inserted  line 
55,  the  routine  keeps  pestering  the 
user  for  a  response  even  though 
he's  frantically  pressing  what 
seems  to  be  the  right  key. 

Now,  practically  anybody  who 
has  satisfactorily  completed  first 
grade  can  tell  a  big  Y  from  a  small  y 
or  a  big  N  from  a  small  n.  But  since 
a  computer  can't  actually  see  these 
characters,  it  can't  tell  them  apart 
by  sight.  Instead,  it  tells  characters 
apart  by  assigning  each  one  a 
unique  number.  Therefore,  to  a 
computer,  the  characters  Y  and  y 
are  as  different  as  A  and  Z. 

To  see  this  for  yourself,  type 
PRINT  ASCC'Y")  and  press  RE- 
TURN. The  computer  should  print 
the  number  89  on  the  screen.  This  is 
the  ASCII  value  for  the  uppercase  Y 
character.  ASCII  stands  for  Ameri- 
can Standard  Code  for  Information 
Interchange.  It's  a  code  developed 
in  the  days  of  teletype  terminals 
which  assigns  a  unique  number  to 
each  character;  the  uppercase  alpha- 
bet from  A-Z  is  numbered  65-90. 
The  ASC()  function  in  BASIC  lets 
you  determine  any  character's 
ASCII  value. 

Now  type  PRINT  ASC("y") 
and  press  RETURN.  Since  the  low- 
ercase ASCI!  alphabet  is  numbered 
96-122,  the  ASCII  value  of  y  is  121 
on  nearly  all  computers.  Exceptions 
are  the  Apple  II 4-  and  most  Com- 
modore computers  (save  for  the 
Amiga).  You  can't  type  this  state- 
ment on  the  Apple  Il-i-  because  it 
lacks  lowercase  characters.  And  on 


the  Commodore  computers,  you 
can't  type  lowercase  characters 
without  switching  to  the  alternate 
character  set  (press  SHIFT- 
Commodore  key).  In  the  standard 
character  set,  the  ASCII  value  of 
uppercase  Y  is  89,  as  usual;  but 
when  you  switch  to  the  alternate 
set,  the  ASCII  value  of  the  lowercase 
y  is  89,  and  the  ASCII  value  of  the 
uppercase  Y  becomes  217. 

Despite  these  exceptions,  you 
can  see  the  point:  Computers  han- 
dle everything  in  terms  of  numbers, 
so  you  have  to  take  this  into  ac- 
count when  writing  programs.  One 
way  to  fix  the  branching  routine 
above  is  to  substitute  these  lines: 
40  IF  A$  =  "Y"  OR  A$  =  "y"  THEN 

GOTO  60 
50  IF  A$  =  "N"  OR  A$="n"  THEN  END 

Censored  Characters? 

There's  another  function  in  BASIC 
which  is  the  opposite  of  ASC() — it 
takes  a  number  and  tells  you  the 
corresponding  ASCII  character.  Try 
entering  the  statement  PRINT  CHR$ 
(89).  The  result  is  the  uppercase  Y. 

Interestingly,  some  ASCII  val- 
ues represent  characters  which  we 
can't  print  here — not  because 
they're  obscene  and  COMPUTE!  is  a 
family  magazine,  but  because  these 
"characters"  perform  a  function 
rather  than  displaying  a  letter, 
number,  or  symbol.  For  instance, 
PRINT  CHR$(125)  clears  the  screen 
on  an  Atari  400,  800,  XL,  or  XE. 
PRINT  CHR$(147)  does  the  same 
thing  on  a  Commodore  64,  128, 
VIC,  or  PET/CBM.  PRINT  CHR$(7) 
rings  the  internal  bell  on  a  Commo- 
dore 128  or  PET/CBM,  Apple,  IBM, 
or  Atari  ST. 

To  discover  other  things  you 
can  do  by  printing  these  unprint- 
able characters,  look  for  a  table  of 
ASCII  values  in  the  back  of  your 
computer  manual  or  almost  any 
book  on  BASIC  programming.     © 
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The  Human  Side  Of  Telecommuting 


Several  years  ago  I  wrote  in  this 
columri  about  The  Network  Nation, 
a  book  on  human  communication 
via  computer  written  by  Starr  Hiltz 
and  Murray  Turoff  (Addison- 
Wesley,  1978).  The  authors  made 
several  predictions  in  the  book,  in- 
cluding the  speculation  that  com- 
puterized conferencing  would  be  a 
prominent  form  of  communication 
in  most  organizations  by  the  mid- 
1980s;  would  make  it  possible  for  a 
large  percentage  of  the  labor  force 
to  work  at  home  during  at  least  half 
of  the  normal  work  week;  and 
would  indirectly  conserve  sizable 
amounts  of  energy  by  substituting 
communication  for  travel. 

Of  14  predictions  made  by 
these  authors,  I  want  to  focus  on 
just  these  three — not  because  they 
haven't  yet  happened,  but  because 
they  were  very  reasonable  predic- 
tions in  1978. 

If  these  predictions  were  rea- 
sonable then,  what  has  kept  them 
from  coming  true?  Based  on  the 
price  of  gasoline  and  the  high  quali- 
ty of  our  computer  and  communi- 
cations technology,  telecommuting 
seems  ripe  for  development.  Some 
companies  have  expressed  great  in- 
terest in  this  style  of  working,  espe- 
cially since  it  allows  workers  to 
function  as  independent  contrac- 
tors, thus  reducing  the  employer's 
overhead. 

One  company  which  has  con- 
ducted an  experiment  in  this  field  is 
Avco  Lycoming,  one  of  the  world's 
leading  manufacturers  of  gas  tur- 
bine engines.  Given  the  highly 
technical  nature  of  this  company's 
business,  many  of  their  employees 
(software  designers,  for  example) 
are  information  workers  who 
would  be  suitable  candidates  for 
telecommuting. 

In  September  1984,  one  of 
these  employees,  Lee  Jacko,  had 
asked  to  take  part  in  a  six-month 
telecommuting  experiment.   The 


company  worked  out  the  details 
and  arranged  for  it  to  be  monitored 
and  evaluated  by  Drs.  Herb  Spirer 
and  Al  Katz  from  the  University  of 
Connecticut. 

Water  Cooler  Conversation 

Jacko's  reason  for  trying  this  experi- 
ment was  that  she  planned  to  be  a 
mother  some  day,  and  she  wanted 
to  see  if  she  could  work  effectively 
in  her  home.  The  fact  that  commut- 
ing to  work  took  one  hour  each  way 
probably  contributed  to  her  interest 
as  well.  As  a  software  designer  and 
programmer,  Jacko  is  comfortable 
with  computers,  and  the  company 
set  up  an  IBM  PC-XT  in  her  home. 

Early  in  the  experiment  it  was 
found  that  she  needed  to  show  up 
at  the  office  one  day  a  week  just  to 
stay  in  touch  with  her  colleagues.  In 
retrospect,  this  is  easy  to  under- 
stand. We  don't  often  think  about 
it,  but  much  of  our  information- 
gathering  is  informal.  We  join  a 
conversation  at  the  water  cooler 
that  leads  to  a  better  way  to  solve  a 
problem,  or  we  hear  of  a  new  job 
opening  in  another  division,  and  so 
on.  An  amazing  amount  of  valuable 
information  is  exchanged  informal- 
ly. Many  years  ago  when  I  worked 
for  a  Fortune  500  company,  I  found 
that  one  of  the  best  ways  to  spread 
information  was  to  "accidentally" 
leave  it  in  the  office  copier! 

Jacko  also  quickly  realized  that 
she  was  missing  the  benefits  of  reg- 
ularly scheduled  group  meetings. 
As  soon  as  this  problem  was  identi- 
fied, a  speakerphone  was  set  up  in 
the  conference  room  so  she  could 
participate  from  home. 

Jacko  is  not  a  loner.  She  likes 
being  where  the  action  is,  and  was 
afraid  that  this  experiment  might 
hurt  her  career.  By  being  out  of 
sight,  she  was  afraid  of  being  out  of 
mind  as  well.  But  in  fact,  her  col- 
leagues were  quite  supportive  and 
she  found  that  telecommuting 
didn't  hurt  her  career  at  all. 


She  cautions  that  telecommut- 
ing isn't  for  everyone,  however.  It 
takes  discipline  to  work  without  su- 
pervision. Even  though  she  had 
clearly  set  goals,  it  was  her  own 
work  habits  that  insured  her  dili- 
gence on  the  job.  To  help  maintain 
this  discipline,  she  rose  al  the  same 
time  as  her  husband  each  morning, 
and  got  dressed  just  as  though  she 
were  leaving  the  house  for  work. 
She  worked  from  8  a.m.  to  6  p.m., 
and  her  only  concession  to  being  at 
home  was  an  occasional  two-hour 
lunch  to  compensate  for  her  longer 
work  day.  Both  Jacko  and  her  su- 
pervisor were  very  happy  with  the 
quality  of  her  work. 

Social  Animals 

At  the  end  of  the  six-month  experi- 
ment, Jacko  was  ready  to  come  back 
to  the  office.  The  experience  of 
working  at  home  was  good,  but  she 
missed  being  with  her  colleagues. 
Now  she  believes  she'd  be  happy 
spending  four  days  a  week  at  home 
for  six  months,  followed  by  a  two- 
month  stint  in  the  office. 

The  researchers  who  studied 
her  during  this  experiment  expect- 
ed to  see  morale  problems,  but 
none  appeared.  In  fact,  Jacko  main- 
tains that  people  who  work  well  in 
isolation  would  really  blossom  as 
telecommuters. 

The  benefits  of  telecommuting 
seem  to  be  great,  yet  it  still  is  not 
popular.  The  reasons  probably  have 
more  to  do  with  human  nature  than 
with  technology.  We  are  social  ani- 
mals and  seek  the  company  of  our 
peers.  Whether  it  is  a  collection  of 
aborigines  gathering  around  a  water 
hole,  or  a  gathering  of  executives 
around  the  water  cooler,  we  need 
face  to  face  contact  with  other  hu- 
mans on  a  regular  basis.  Perhaps 
one  day  a  week  is  enough  time  to 
socialize  in  the  office.  More  research 
needs  to  be  done.  We  understand 
the  technology;  it  is  human  nature 
that  we  need  to  focus  on  now.     ® 
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The  World  Inside  the  Computer 


^red  D'lgnazio,  Associate  Editor 


Arjan  Singh  Khalsa:  A  Prophet  Of  Blonic  Man 


Bionic  man. 

What  do  these  words  bring  to 
mind?  They  make  me  think  of  sci- 
ence fiction,  a  TV  show  called  The 
Six  Million  Dollar  Man,  and  Lee  Ma- 
jors. Majors  starred  as  the  bionic 
man  we  are  most  familiar  with — 
more  machine,  really,  than  human. 
Humans  as  machines. 

But  a  bionic  man  can  also  be  a 
blind  person  using  a  talking  word 
processor,  or  a  victim  of  cerebral 
palsy  blowing  into  a  puff  switch  to 
activate  a  computerized  wheelchair 
or  robotic  arm.  Here,  technology 
doesn't  make  a  person  more  ma- 
chinelike. Instead,  it  enables  him  or 
her  to  be  more  fully  human. 

One  person  with  this  view  of 
bionic  man  is  Arjan  Singh  Khalsa, 
of  Berkeley,  California.  From  the  tip 
of  his  toes  to  the  top  of  his  white 
turban,  Khalsa  is  a  man  with  a  mis- 
sion: To  shape  technology  in  a  hu- 
man image  so  it  can  become  a 
prosthetic  extension  of  the  human 
mind  and  body.  He  is  a  proponent 
of  a  new  man/machine  symbio- 
sis— a  prophet  of  bionic  man. 

The  Elegance  Of 
Technology 

On  the  one  hand,  Khalsa  is  an 
evangelist  for  technology  and  for  its 
potential  to  help  people.  On  the 
other  hand,  he  is  an  arch-critic  of 
technology  who  condemns  its  dis- 
ruptive effects  on  people's  lives.  He 
is  also  the  founder  and  president  of 
Educational  Software  Review,  a 
"technology  watchdog"  company 
that  tests  new  educational  software 
from  large  corporations.  And  he  is 
producing  his  own  products  which 
embody  his  goals  to  make  technol- 
ogy more  elegant, 

"Elegant"  is  a  word  he  uses  a 
lot.  According  to  Khalsa,  technol- 
ogy is  elegant  when  it  is  a  simple, 
natural  extension  of  a  person's 
mind  or  body;  when  it  is  immedi- 
ately useful;  and  when  it  is  being 


stretched  to  its  limit — in  the  service 
of  human  beings.  Khalsa  doesn't 
believe  a  product  is  truly  elegant 
unless  it  can  be  used  by  both  "en- 
abled" and  disabled  people. 

For  example,  Educational  Soft- 
ware Review  is  marketing  a  pro- 
gram called  The  Magic  Music 
Teacher  (a  $69.95  two-sided  disk  for 
the  Apple,  and  soon,  for  the  Com- 
modore 64).  Two  key  features  of 
The  Magic  Music  Teacher  are  that  it 
can  be  operated  by  pressing  only 
two  keys — or  two  switches,  for  a 
disabled  person;  and  when 
equipped  with  an  Echo/Cricket 
speech  synthesizer,  it  talks — so  it 
can  be  used  by  a  blind  person. 
These  features  have  made  the  pro- 
gram immensely  popular  with  ev- 
eryone from  the  California  School 
for  the  Blind  to  the  Boston  Retarded 
Children's  Choir. 

The  Magic  Music  Teacher  teach- 
es the  children  in  the  choir  by  using 
the  Suzuki  method  of  hearing  a 
melody,  then  learning  to  repeat  it. 
The  children  quickly  master  the 
two  switches,  and  they  begin 
"playing"  a  musical  instrument. 
According  to  Khalsa,  "The  kids 
laugh  and  rejoice  when  they  use 
the  program.  They  are  learning  that 
they  can  succeed  at  something. 
Technology  and  music  are  increas- 
ing the  joy  in  their  lives," 

It's  no  surprise  that  The  Magic 
Music  Teacher  is  also  a  hit  with 
enabled  children  and  adults,  "No- 
body who  has  begun  using  the  pro- 
gram has  ever  used  it  for  less  than  a 
half  hour,"  says  Khalsa.  "It  is  too 
easy,  and  too  much  fun," 

Restoring  The  Sound 

Educational  Software  Review's  oth- 
er product  is  the  flip  side  of  this 
same  philosophy.  After  observing 
dozens  of  children  using  computers 
in  classrooms,  he  noticed  that  many 
good  educational  programs  which 
use  sound  are  muted  so  other  chil- 


dren won't  be  disturbed,  "it's  a 
shame,"  says  Khalsa.  "The  com- 
puter is  one  of  our  most  powerful 
learning  tools,  partly  because  it  re- 
inforces learning  with  sound  as 
well  as  images.  Then  we 'turn  off 
the  sound." 

Khalsa  thinks  this  is  an  ex- 
ample of  not  properly  fitting  tech- 
nology to  human  beings.  With  the 
flick  of  a  switch,  technology  is  dis- 
abling hearing  children  and  render- 
ing them  deaf.  His  solution  is  a 
computer  headset,  the  Little}ack 
($24.95,  with  a  volume  control  and 
a  connector  that  allows  up  to  ten 
children  to  listen  together  if  they 
plug  their  own  headsets  into  an 
adapter). 

Khalsa  is  looking  for  licenses  to 
convert  more  existing  products  into 
products  appropriate  for  the  35  mil- 
lion disabled  and  handicapped  peo- 
ple in  the  U.S.  In  addition,  he's 
trying  out  new  inventions,  like  a 
talking  word  processor.  Khalsa  says 
his  word  processor  is  "like  a  huge 
Speak  'N'  Spell,  only  it  can  inter- 
face with  a  computer  and  is  com- 
pletely programmable.  For 
example,  Vietnamese  kids  can  cray- 
on pictures  in  squares  on  regular 
paper,  then  slip  the  paper  on  the 
word  processor's  large,  flat  pad. 
When  they  press  the  pictures,  the 
word  processor  will  print  out  the 
words  in  English  describing  the  pic- 
tures; and  it  will  say  the  words 
aloud — in  English  and  in  Viet- 
namese." 

For  Khalsa,  a  disability  can  be 
physical,  mental,  emotional,  cultur- 
al— or  technological.  Machines 
should  never  be  allowed  to  disable 
a  person.  Instead,  they  should  en- 
able people  and  help  them  lead 
richer,  more  human  lives. 

(To  contact  Arjan  Singh  Khalsa, 
write  Educational  Softioare  Reviezv, 
1400  Shattuck  Avenue,  Suite  774, 
Berkeley,  CA  94709.)  © 
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INSIGHT:  Atari 


Bill  Wilkinson 


Avoiding  IVIennory  Confusion  In  Atari  BASIC 


After  a  couple  of  months  of  stand- 
ing on  my  soap  box,  I've  decided  to 
step  off  and  get  back  to  business 
again.  Before  I  do,  though,  here's 
one  more  little  rant  and  rave:  I  can 
now  express  my  opinion  of  Atari's 
new  BASIC  for  the  520ST.  In  a 
word:  disappointing.  Neither  ST 
Logo  nor  ST  BASIC  are  viable  pro- 
duction languages,  which  means 
you  can't  write  commercial  applica- 
tions with  them.  Since  even  the  C 
compiler  included  in  Atari's  $300 
software  developer's  package 
doesn't  support  double-precision 
arithmetic,  limiting  you  to  six  deci- 
mal digits  of  precision,  you'd  better 
be  ready  to  purchase  some  lan- 
guage from  an  outside  vendor  if 
you're  serious  about  doing  any  pro- 
gramming on  the  ST  machines. 

Several  months  ago,  I  asked  all 
you  loyal  readers  to  send  me  a  post- 
card or  letter  giving  ratings  to  the 
best  or  worst  Atari-oriented  books. 
Although  I  was  a  little  under- 
whelmed by  the  response,  1  did  get 
enough  ballots  to  at  least  select  the 
three  favorites.  Among  these  three, 
however,  there  was  no  clear-cut 
winner.  And  I  happen  to  feel  that  is 
appropriate,  since  each  addresses  a 
different  part  of  the  knowledge  an 
Atari  programmer  needs.  Anyway, 
according  to  my  readers,  the  best 
books  are  (drum  roll, ..the  envelope 
please):  The  ABC's  of  Atari  Comput- 
ers, by  Dave  Mentley,  published  by 
Datamost;  Your  Atari  Computer,  by 
Lon  Poole  et  al,  published  by 
Osborne/McGraw  Hill;  and  Map- 
ping the  Atari,  by  Ian  Chadwick, 
published  by  COMPUTE!  Books. 
(Incidentally,  you  may  have  no- 
ticed that  COMPUTE!  Books  has 
been  shipping  the  new,  revised  ver- 
sion of  Mapping  the  Atari,  which 
has  several  appendices  and  notes 
devoted  to  the  XL  and  XE 
machines.) 

The  rest  of  this  column  re- 
sponds to  a  number  of  reader  re- 


quests. Although  the  topic  has  been 
covered  in  COMPUTE!  before  (at  least 
in  part),  there  are  many  newcomers 
out  there.  And  even  if  you  aren't  a 
newcomer,  maybe  I  can  provide 
more  insight  into  the  concepts 
involved. 

Finding  Free  Memory 

Q:  Where  in  memory  can  a  pro- 
grammer put  machine  language 
routines,  character  sets,  player/ 
missile  graphics,  and  the  like? 

A:  There  is  no  simple  answer, 
because  it  depends  on  which  lan- 
guage you're  using,  which  DOS, 
etc.  A  couple  of  years  ago,  I  did  an 
entire  series  on  relocatable  machine 
language  which  was  related  to  this 
problem.  So  this  time,  let's  tackle  a 
simpler  and  more  specific  question: 
Where  can  I  put  a  custom  character 
set?  The  following  techniques  will 
also  work  for  many  other  uses,  in- 
cluding player/missile  graphics. 

When  allocating  memory, 
Atari  BASIC— as  well  as  BASIC  XL 
and  BASIC  XE— looks  at  and  be- 
lieves the  contents  of  two  memory 
locations,  LOMEM  and  HIMEM 
(located  at  $2E7,  decimal  743,  and 
$2E5,  decimal  741,  respectively). 
BASIC  always  starts  your  program 
where  LOMEM  tells  it  to  and  lets  it 
grow  as  high  as  the  value  in  HI- 
MEM. Remember  that  this  "grow- 
ing" includes  not  just  your  BASIC 
code,  but  also  the  strings  and  arrays 
dimensioned  by  your  program.  Let's 
consider  LOMEM  first. 

The  fact  that  a  program  always 
starts  at  LOMEM  implies  that  if  we 
increase  the  value  of  LOMEM  and 
then  load  a  program,  the  memory 
between  the  old  value  and  the  new 
one  is  available  for  whatever  pur- 
poses we  have  in  mind.  On  the 
other  hand,  once  a  BASIC  program 
is  loaded  into  memory,  it  ignores 
changes  to  LOMEM.  This  means 
we  can  have  one  program  change 
the  contents  of  LOMEM  and  then 


chain  to  another  program.  The  first 
program  is  unaffected  by  the 
change,  but  the  second  will  be  load- 
ed at  the  new  LOMEM.  Programs  1 
and  2  demonstrate  this  technique. 

Examine  Program  1,  which  en- 
sures that  the  memory  we  wish  to 
reserve  starts  on  a  particular 
boundary.  Remember  that  full 
character  sets  (128  characters)  must 
start  on  IK  memory  boundaries, 
and  half  sets  must  start  on  512-byte 
boundaries.  There  are  similar  rules 
for  player/missile  graphics  (see 
"Atari  Animation  With  P/M 
Graphics,"  a  three-part  series  start- 
ing in  the  September  1985  issue  of 
COMPUTE!).  If  you  actually  type  in 
and  run  the  programs  below,  you'll 
be  in  for  a  little  surprise.  But  do  not 
omit  the  REMark  statements  from 
Program  2,  or  you'll  miss  half  the 
fun.  Feel  free  to  omit  them  from 
Program  1,  For  the  programs  to 
function  properly,  you  must  save 
Program  2  with  the  filename  PRO- 
GRAM2.BAS  (see  line  900  of  Pro- 
gram 1),  If  you're  using  cassette 
instead  of  disk,  change  line  900  in 
Program  1  to  RUN  "C:"  and  make 
sure  the  tape  is  cued  to  Program  2 
before  you  run  Program  1. 

A  minor  caution:  The  reason 
we  base  the  changes  to  LOMEM  on 
the  contents  of  locations  128  and 
129  (BASIC'S  internal  MEMLO 
pointer)  instead  of  the  actual  LO- 
MEM contents  is  complex.  I  have 
discussed  it  in  this  column  before, 
but  the  heart  of  the  problem  is  that 
some  Atari  device  drivers  (includ- 
ing the  850  Interface  Module's  R: 
handler)  do  not  correctly  restore 
LOMEM  when  the  SYSTEM  RESET 
button  is  pressed.  After  a  reset,  BA- 
SIC'S pointer  is  more  reliable.  For 
the  same  reason,  and  for  safety's 
sake,  programs  bumping  LOMEM 
should  always  bump  it  higher  than 
the  top  of  the  BASIC  program  cur- 
rently in  memory.  And  one  last 
piece  of  advice:  If  you  run  Program 
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1  over  and  over  again,  it  keeps  rais- 
ing LOMEM  higher  and  higher. 
Eventually  you'll  run  out  of  memo- 
ry. You  probably  need  some  sort  of 
flag  elsewhere  in  memory  (Page  6?) 
which  tells  the  program  not  to  raise 
LOMEM  again. 

Modifying  HIMEM 

Enough  about  LOMEM;  what 
about  HIMEM?  Truthfully,  if  you 
know  how  big  your  program  is  and 
what  it's  going  to  use  in  the  system, 
you  can  put  anything  you  want 
(character  sets,  machine  language, 
player/missile  shape  data,  etc.)  in 
the  memory  between  the  top  of 
your  program  and  the  bottom  of 
screen  memory.  The  only  time  the 
contents  of  HIMEM  are  used  is 
when  BASIC  checks  to  ensure  that 
APPMHI  (location  14,  $0E)  hasn't 
collided  with  it.  APPMHI  is  essen- 
tially BASIC'S  high  water  mark.  It 
keeps  track  of  the  top  of  the  run- 
time Stack,  which  is  always  above 
the  string  and  array  space,  which  in 
turn  is  always  above  your  program. 
So,  if  you  know  that  your  program, 
its  data,  and  its  stack  will  never 
grow  too  large,  you  could  ignore 
HIMEM  altogether.  It's  much 
cleaner,  though,  to  tell  the  system 
what  you're  using  by  modifying 
HIMEM. 

How  and  why  does  HIMEM 
change  if  you  don't  do  this?  The 
most  usual  cause  is  a  change  in  the 
graphics  mode.  For  example,  while 
ordinary  text  screen  graphics 
(GRAPHICS  0)  occupy  less  than  IK 
of  memory,  several  graphics  modes 
(such  as  modes  8,  9,  10,  11,  and  15) 
require  8K  of  screen  memory.  To 
demonstrate  this,  type  in  and  run 
the  following  line,  preferably  after 
hitting  the  SYSTEM  RESET  button: 

GO  =  FRE(0);GR.8;PRINT  GO,FRE(0),GO- 
FRE(O) 

This  displays  three  numbers: 
memory  available  for  your  pro- 
gram(s)  in  text  mode,  usable  memo- 
ry in  mode  8,  and  the  extra  amount 
used  by  mode  8  graphics. 

Generally,  the  best  method  is 
to  always  put  your  own  goodies 
below  the  area  occupied  by  the 
most  memory-intensive  graphics 
mode  you  plan  to  use.  So  either 
look  in  a  memory  map  book  to  find 
out  how  much  room  a  certain 
graphics  mode  will  take,  or  simply 
change   modes   before   using   the 


memory. 

For  an  example,  try  Program  3. 
It's  essentially  the  same  as  Program 
2.  The  difference  is  simply  where 
we  move  the  character  set.  The  RE- 
Marks  explain  where  you  should 
insert  your  own  graphics  mode 
declaration.  @ 


For  instructions  on  entering  this  iisting,  piease 
refer  1o  "COIVIPUTEI's  Guide  to  Tvping  In 
Programs"  in  this  issue  of  COMPUTE!. 


Program  1:  MEMLO  Bumper 
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Program  2:  Character  Set 
Mover,  Version  1 
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0  BU 

IRST 

SAME 

JUST 
M 
THE 

3 
PEEK 


SLOWLY  DE 

(RND(0) *1024) 

INT {RND  C0)  *25 


Program  3:  Ctiaracter  Set 
Mover,  Version  2 


DS  150 

lA  160 

JJ  170 

GG  180 

SD  190 

Fl  200 
HH  210 
HJ  220 

LA  230 

HK2  40 
BE  2  50 

HP  260 

if  2  70 

Hfl  2B0 

HJ  29  0 

H6  300 

HB  310 

AH  320 

BIf  330 
FE  340 

CC  350 

IN  360 

HC  370 
LJ  380 

PB  390 
BK  400 

NP  4  10 
BE  4  20 


REM 

HIS 

REM 

SET 

REM 

TER 

REM 

EMOR 

REM 

DES 
REM 
REM 
REM 

AND 
REM 

AGA 
REM 
GRAP 
D  CL 
EMOR 
GRAP 
ER  M 
SIZE 
REM 
NG  A 

STA 
POKE 
RE  E 
MEMH 
IZE) 
POKE 
LOWE 
POKE 
BAS 
BUFF 
POKE 

ND 
LIST 

SOM 
REM 

CHA 
FOR 
POKE 
(573 
NEXT 
REM 
STRO 
POKE 
+  BUF 
6) 
GOTO 


JUST  AS  A  DEMO,  T 

PROGRAM 

CHANGES  THE  CHAR 

POINTER 

COPIES  THE  CHARAC 

SET 

TO  THE  RESERVED  M 

Y, 

AND  THEN  RANDOMLY 

TROYS 

THE  CHARACTERS! 

HIT  RESET  TO  QUIT 

GET 
NORMAL  CHARACTERS 

IN. 


HIC 
EAR 
Y  ! 
HIC 
ODE 

4 
ALW 
FTE 
TEM 

74 
ND- 
I-I 
»SI 

74 
R  H 

75 
IS 
ER 

75 
MOR 

15 
ETH 
REA 
RAC 
ADD 

BU 
44  + 

AD 
MOV 
YED 

IN 
FER 


S  7: REM  JUST  T 
ABOUT  4K  OF  M 

S  0:REM  OR  OTH 


AYS 

R  TH 

ENT 

1  ,  25 

OF-P 

NT  (P 

ZE-S 

2,  ME 

IMEM 

6,  ME 

CHAN 

PEEK 

2,   1: 

E  CU 

0,  24 

IN6 

DY  T 

TERS 

R=0 

FFER 

ADDR 

DR 

ED.  . 


DO  FOLLDWI 
E  GRAPHICS 

5: REM  ENSU 

AGE  BOUND 

EEK (742) /S 

IZE 

MHI-1 : REM 

MHI:REM  CH 

GED 

(756) *256 

PRINT  :REM 

RSOR 

0;REM  JUST 

TO  SHOW 

0  MOVE  THE 

TO  1023 

+ADDR,PEEK 

) 

.SLOWLY  DE 


T(RND(0) tl024) 

INT (RND (0) «25 


410 
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Programming  the  Tl 


C.  Regena 


Computerized  Messages 


With  the  abundance  of  home  com- 
puters, people  are  having  fun  with 
computerized  messages  and  elec- 
tronic communication.  For  in- 
stance, you  can  program  your  TI  to 
play  "Happy  Birthday"  to  a  friend. 
My  December  columns  for  the  last 
few  years  have  contained  programs 
for  the  TI  that  can  be  used  for 
Christmas  greetings. 

The  recent  birth  of  our  baby 
was  another  occasion  for  computer- 
ized messages.  My  spouse  put  a 
system  message  on  the  mainframe 
computer  at  work  so  fellow  em- 
ployees would  know  our  news. 
Electronic  mail  carried  the  message 
to  other  colleagues.  Some  of  our 
relatives  and  friends  have  TI  com- 
puters, so  I  wrote  a  birth-announce- 
ment program  and  sent  them 
copies.  We  mailed  printed  an- 
nouncements, complete  with 
graphics,  to  other  friends  who  don't 
have  computers.  We're  such  proud 
parents  that  I  decided  to  include  the 
program  here.  You  can  use  this  gen- 
eral idea  to  create  your  own  com- 
puterized messages. 

The  music  for  this  program  is 
Brahm's  "Lullaby."  Line  140  de- 
fines a  tempo  in  the  variable  T.  The 
value  of  T  represents  an  eighth 
note,  and  all  the  CALL  SOUND 
statements  express  duration  in 
terms  of  T.  Lines  120  and  130  de- 
fine sound  frequencies  for  the  mel- 
ody notes.  Notice  that  the  DATA 
statement  has  eight  numbers  which 
correspond  to  the  eight  variable 
names  in  the  READ  statements.  By 
the  way,  these  frequencies  actually 
represent  the  flats  for  each  named 
note  except  F. 

Line  150  changes  the  screen 
color.  I  had  planned  to  use  color  8 
(cyan)  or  5  (dark  blue)  for  a  baby 
boy,  or  color  7  (dark  red)  for  a  baby 
girl. 

Lines  160-600  combine  CALL 
SOUND  statements  with  CALL 
CHAR  statements  to  define  graphic 


characters  while  playing  music. 
Lines  610-650  define  the  colors  for 
the  graphics.  Line  620  defines  a 
light-blue  color  for  the  stork's  hat 
andpartof  the  baby  (try  color  10  for 
a  baby  girl).  Lines  630-650  define 
the  colors  for  the  stork.  If  you  prefer 
white  lettering  instead  of  blacky  you 
could  change  line  630  to  FOR  N=2 
TO  11. 

Lines  660-1000  play  music 
while  printing  the  announcement. 
It  displays  the  graphics  on  the 
screen  with  PRINT  instead  of  CALL 
HCHAR  or  CALL  VCHAR  because 
the  PRINT  method  is  quicker.  The 
CHR$  statement  specifies  a  certain 
character  number  to  be  printed. 
Most  of  the  stork  is  composed  of 
characters  that  are  redefined  lower- 
case letters.  Release  the  ALPHA 
LOCK  key  to  type  these  letters  in 
the  statements. 

Lines  1010-1420  continue 
playing  the  music.  Lines 
1430-1450  keep  the  announcement 
on  the  screen  until  a  key  is  pressed. 
A  keypress  clears  the  screen  and 
ends  the  program. 

If  you  prefer  to  save  typing, 
you  can  obtain  a  copy  of  "An- 
nouncement" by  sending  a  blank 
cassette  or  disk,  a  stamped,  self- 
addressed  mailer,  and  $3  to: 

C.  Regena 
P.O.  Box  1502 
Cedar  City.  UT  84720 


100  REM  ANNaUNC:EMENT 

110  CALL  CLEAR 

120  READ  BG, BA, BB,C, D,E,F 

,G 
130  DATA  185,208,233,247, 

277,31 1.349, 370 
140  T=350 

150  CALL  SCREENO) 
160  CALL  SDUNDd,  BE,  5) 
170  CALL  CHAR <  123,  "000000 

00003C7CFE" J 
1B0  CALL  CHAR <97, "00070C0 

B0S10101  '■  ) 
190  CALL  SOUND (T, BB, 6) 
200  CALL  CHAR  t9B,  "FC0201  " 

) 
210  CALL  CHAR (99, "0000008 


220 
230 

240 

250 

260 

270 

280 

290 

300 

310 

320 

330 

340 

350 

360 

370 

380 
390 

400 

410 

420 

430 

440 

450 

460 

470 

4B0 
490 

500 

S10 
520 

530 

540 

550 

560 


0804 

CALL 

CALL 

1070 

CALL 

8989 

CALL 

0808 

CALL 

0031 

CALL 

9,  B) 

CALL 

80S0 

CALL 

7CS3 

CALL 

A890 

CALL 

40B0 

CALL 

,8) 

CALL 

0202 

CALL 

0808 

CALL 

,8) 

CALL 

9050 

CALL 

2B28 

CALL 

CALL 

B07F 

CALL 

0CF4 

CALL 

0404 

CALL 

1212 

CALL 

IBS, 

CALL 

0402 

CALL 

0000 

CALL 

0000 

CALL 

1222 

CALL 

CALL 

0000 

CALL 

3020 

CALL 

CALL 

0000 

CALL 

0810 

CALL 

7,BB 

CALL 

a7F9 

CALL 

C0S0 


0404" ) 
SOUND ( 
CHAR  < 1 

888484" 
CHAR ( 1 

898909" 
CHAR ( 1 

040404" 
CHAR ( 1 

2E  222  2 " 
SOUND ( 

CHAR  C 1 
40404" ) 

CHAR ( 1 
80403F" 

CHAR ( 1 
63FC38" 

CHAR ( 1 
000F3" ) 

SOUND ( 

CHAR ( 1 
02FC04" 

CHAR  C  1 
040404" 

SOUND  I 

CHAR( 1 
502828" 

CHAR  < 1 
24231 " ) 

SOUND ( 

CHAR ( 1 
00008" ) 

CHARd 
0a0SC" ) 


2*T, D, 4) 

00, "000E1 1 

) 

01 , "003057 

) 

02, 

) 

03, 

) 

2tT, D,4, 13 


04 

05 

> 
06 

) 
07 


404080 
828140 
5152D4 

E02020 

T, BB, 5, 139 

08, "040404 

) 

09,  "  1  1  1  1  II 

) 

T, BB, 4, 139 


CHAR  ( 
040404 

CHAR  ( 
2141C1 

SOUND 
S) 

CHAR  ! 
01  "  J 

CHAR  ( 
00C03F 

CHAR  ( 
000FF" 

CHAR  ( 
C20201 

SOUND 

CHAR  ( 
0000FF 

CHAR  < 
2020C" 

SOUND 

CHAR  < 
003844 

CHAR  ( 
3F"  ) 

SOUND 

CHAR  ( 
S2B08" 

CHAR  ( 
4"  > 


1  14 
"  ) 
1  15 
"  ) 
(2* 

1  1.6 

117 

"  J 

US 

) 

1  19 

"  ) 

(T. 

120 

"  ) 

121 

1 

tT, 

122 

"  ) 

12S 

(2«T 

129 

) 

130 


'080808 
■040E0E 


'2020A0 

'372834 


2«T, D, 4) 
12, "C00000 

13, "040404 


" 040404 
"  140C0C 

, 139, a, 

" 101008 

"7F0000 

"C00000 

"08091  1 

B,  5) 

" B00000 

"844448 

"000000 
"010204 
,G,3,D, 
"B080B0 

"000000 
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570 

580 

5<?0 

600 

610 
620 
630 
640 
650 
660 

670 

6S0 
690 

700 

710 
720 

730 

740 
750 

760 
770 

7B0 
7  90 

800 
810 
820 

830 

840 

850 

860 
870 

880 
890 

900 
910 

920 
930 
940 
950 
960 
970 

980 

990 

1000 

1010 

1020 

1030 

1040 

1050 

1060 


CALL 

8000 

CALL 

8,  BB 

CALL 

■'  ) 

CALL 

BBS" 

CALL 

CALL 

FDR 

CALL 

NEXT 

CALL 

,BE, 

PRIN 

) 

CALL 

,7,  1 

PRIN 

DLER 

PRIN 

EGEN 

PRIN 

CALL 

,7,  1 

PRIN 

E  TH 

PRIN 

PRIN 

)  ;  CH 

CALL 

PRIN 

)  ; 

NN  W 

CALL 

PRIN 

)  ;CH 

CALL 

PRIN 

CALL 

) 

CALL 

39,  0 

PRIN 

PRIN 

.  M 

CALL 

PRIN 

UND5 

CALL 

PRIN 

NCHE 

CALL 

CALL 

) 

CALL 

CALL 

CALL 

CALL 

CALL 

CALL 

) 

CALL 

5,7) 

PRIN 

ED  B 

PRI 

Y 

CAL 

.6, 

CAL 

5) 

CAL 

5,B 

CAL 

5,  1 

CAL 

5) 

CAL 


CHAR (131, "808080 
80808" ) 

SOUND (3*T, F, 2, D, 
,8) 

CHAR (132, "000003 

CHAR (133, "808060 

COLOR ( 13, 11,11 

COLOR (12,6,1) 
N=9  TO  1 1 

COLOR (N, 16, 1 ) 

N 

SOUND (T, E, 2, BB, 7 
9) 
T  TAB (5) ; CHRS ( 123 

SOUND (2*T, E, 3, Bfi 

75,9) 

T  TAB (4) ; "abcCHAN 
.  AND" 

IT  "de  fghCHERYL  R 
lA  WHITELflW" 
IT  "  i  j  k  1  mn  " 

SOUND (2*T, D, 4, BA 

75,9) 

IT  "  opqrsz ANNOUNC 
IE  BIRTH  OF" 
(T  "  tuvwxy" 
IT  TAB(3) ; CHR$ ( 128 
[R*  (  129)  ; CHRS  (130) 
,  SOUND (T, BA, 4) 
IT  TAB (4) ; CHRS !i31 

4  SPACESJBRETT  LY 

HITELAW" 
SOUND (T, BB, 4) 

T  TAB (3) ; CHRS ( 132 
IRS  (133) 

SOUND (T, C, 3) 

SOUND (T, C, 3, BG, B 

SOUND (2«T, BA, 3, 1 
) 

OCTOBER 

43  A 

SOUND (T, BA, Z) 
T  : "WEIGHT:    8  PO 
10  OUNCES" 
SOUND (T, SB, 2) 
T  :  "LENGTH:    22  I 
S" 
SOUND (T, C, 2) 
SOUND (T, C, 2, BG, 8 

SOUND (T, 139, 81 
SOUND (T, 175, 81 
SOUND (T, BA, 3) 
SOUND (T, C, 2) 
SOUND (T, F,  1  ) 
SOUND (T, E, 1 , BG, 6 

SOUND (2*T, D, 2, 17 

,  r  :   :  "ALSO  WELCOM 
:V  CHERY,  " 

NT  "RICHARD,   CIND 

BOB,  RANDY" 

L  SOUND (2«T, F, 2, C 

BA,  8) 

L  SOUND (T, G, 2, BB, 

L  SOUND (T, 6, 2, BB, 

G,  8) 

L  SOUND (T, G, 2, BB, 

39,  7> 

L  SOUND (T, B, 2, BB, 

L  SOUND (T, BG, 4) 


T  "BORN: 

1985" 
T  : "TIME:    2: 


1070 
1080 

1090 

1  100 

1110 

1  120 

1  130 

1  140 

1  150 

1  160 

1  170 

1  180 

1  190 

1200 

1210 
1220 
1230 

1240 

1250 
1260 
1270 

1280 

1290 

1300 

1310 

1320 

1330 

1340 

1350 


1420 

1430 
1440 
1450 
1460 


CALL  SOUND ( T , BG, 3> 

CALL  SOUND (2«T, G, 2, E 

,5) 

CALL  SOUND (2*T, G, 2, E 

,  5, BB, B) 

CALL  SOUND (T, E, 3, B6, 

S) 

CALL  SOUND (T, C, 4, BG, 

8) 

CALL  SOUND (4«T, D, 3, B 

B, 6, B6,S} 

CALL  SOUND (T, BB, 4, 13 

9,8) 

CALL  SOUND (T, BG, 4,  13 

9,8) 

CALL  SOUND (T, C, 3, BA, 

6) 

CALL  SOUND (T,C, 3, BA, 

6, 139, 9) 

CALL  SOUND (T, D, 2, BB, 

5) 

CALL  SOUND (T, D, 2, BB, 

5, 139, 9) 

CALL  SOUND (T, E, 1 , C, 4 

) 

CALL  SOUND (T, E,  1,C, 4 

, 139,9) 

CALL  SOUND (T, BB, 1 ) 

CALL  S0UND(T,D,2> 

CALL  SOUND (T, D, 2, BG, 

8) 

CALL  SOUND (T, D, 2, 139 

,8) 

CALL  SOUND (T, BG, 4) 

CALL  SOUND CT, BG, 3) 

CALL  SOUND (2«T, G, 1 , E 

CALL  SOUND (2*T,G, 1,E 

, 4, BG, S) 

CALL  SOUND (T,E, 2, BG, 

6) 

CALL  SOUND (T, C, 3, B6, 

6) 

CALL  SOUND (4*T, D, 4, B 

B, 8, BG, 9) 

CALL  SOUND (T,  BB, 4,  13 

9,8) 

CALL  SOUND (T, BO, 3, 13 

9,  S) 

CALL  SOUND (T, C, ~, BA, 

7) 

CALL  SOUND (T, C, 3, 139 

,  8) 


LHLU  SUUKU  I  I  ,  I-  ,  3,  L  ,  "y 

) 

CALL  SOUND (4*T, G,5, B 

B, 9, BG, 12) 

CALL  KEY(0,K,S> 

IF  S< 1  THEN  1430 

CALL  CLEAR  ^ 

END  @ 
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Personal  Computing 


Donold  B.  Trivette 


Compiling  BASIC 


This  month's  issue  has  a  couple  of 
articles  about  the  Motorola  68000, 
the  super- fast  microprocessor  chip 
that  powers  the  Apple  Macintosh, 
Atari  ST,  and  Commodore  Amiga. 
IBM  users  aren't  left  out  of  this 
contest.  Intel  Corporation  has  its 
own  super-fast  microprocessor,  the 
80286,  which  is  found  in  the  IBM 
AT,  the  AT&T  PC  6300 +  ,  and  sev- 
eral AT  compatibles.  But  if  you 
don't  want  to  buy  a  new  computer 
just  now,  there's  another  way  to 
make  some  of  your  programs  run 
faster. 

Consider  the  following  three- 
statement  BASIC  program  we'll  call 
PROGl.BAS: 
10  FOR  1  =  1  TO  2000 
20  J  =  I*I 
30  NEXT  I 

It  finds  the  squares  of  the  num- 
bers from  1  to  2,000.  It  takes  eight 
seconds  on  a  PC  or  PCjr,  three  sec- 
onds on  an  IBM  AT  with  its  faster 
microprocessor,  and  two  seconds 
on  AT&T's  6300 -I- .  Now,  let's  see  if 
we  can  get  the  speed  of  the  AT&T 
computer  out  of  a  PC  or  PCjr. 

IBM  BASIC  is  an  interpretive 
language.  This  means  the  computer 
must  translate  each  statement  into 
machine  language  instructions 
before  execution.  Because  PROGl 
.BAS  consists  of  a  loop,  BASIC 
must  translate  and  execute  a  total  of 
6,000  statements  (three  statements 
2,000  times).  Although  the  over- 


head to  interpret  a  single  instruc- 
tion is  very  small,  the  overall  time 
adds  up.  Think  how  much  faster 
the  program  could  run  if  each 
BASIC  instruction  could  be  trans- 
lated into  machine  language  just 
once,  rather  than  each  time  it  is 
executed.  Basically,  that's  what  a 
compiler  does. 

Compiling  a  program  is 
usually  a  two-step  process.  First, 
the  source  program — that's  your 
BASIC  program — is  processed  by 
the  compiler.  The  output  from  the 
compiler  is  then  processed  by  a  link 
program.  The  output  from  the  link- 
er is  the  compiled  BASIC  program 
in  the  form  of  an  .EXE  file. 

New  &  Improved  Compiler 

Last  summer,  IBM  released  Version 
2.0  of  its  BASIC  Compiler.  It  incor- 
porates all  the  new  features  added 
to  interpreter  BASIC  since  the  first 
version  of  the  BASIC  Compiler  was 
released  in  1982.  These  include 
VIEW,  WINDOW,  PAINT,  SHELL, 
hard  disk  commands,  and  all  of  the 
advanced  features  of  the  PCjr,  such 
as  multivoice  music  and  user- 
defined  palettes.  In  addition,  IBM 
has  added  some  features  to  Com- 
piled BASIC  that  are  not  available 
in  the  interpreter.  These  include 
named  subprograms,  user-defined 
multiline  functions,  and  separately 
compiled  subprograms.  Also,  the 
Compiler    manual    has    been    en- 


Size  in  Bytes 

PROGl.BAS 
PROGl.BAS  (ASCH) 
PROGl. OBJ 
PR0G1.EXE 

Compiling  Time 

PROGl.BAS 

Linking  Time 

PROGl  .OB] 

Execution  Time 

Interpreted  PROGl.BAS 
Compiled  PROGl.BAS 


Compiler  1.0 

56 

74 

875 

18,304 

:02 


Compiler  2.0 

56 

74 

980 

23,334 

;02 


1:35 


IBM  PC 

:08 
:02 


IBM  AT 

;03 
:01 


:59 
AT&T  6300 -F 

:02 

:00.5 


larged  to  two  volumes:  BASIC  Com- 
piler Fundamentals  and  BASIC 
Compiler  Language  Reference. 

There's  a  price  to  pay  for  all 
these  goodies.  The  old  version  sold 
for  $300;  the  new  version  carries  a 
retail  price  of  $495.  And  there's  an- 
other factor  to  consider:  Version  2.0 
generates  larger  .EXE  files  than 
Version  1.0. 

Unless  you  need  some  of  the 
compiler's  advanced  features,  it's 
easy  to  use;  in  fact,  it's  easier  to  run 
than  most  word  processing  pro- 
grams. First,  you  save  the  BASIC 
program  on  disk  with  the  ASCII 
option  (SAVE  "PROGl. BAS",A). 
Next,  you  run  the  compiler  by  typ- 
ing its  name:  BASCOM.  It  asks  for 
the  name  of  the  input  file  (PROG- 
l.BAS) and  any  other  options  you 
might  want  to  select. 

If  the  input  file  is  PROGl.BAS, 
the  compiler's  output  goes  to  a  file 
called  PROGl. OBJ.  This  is  known 
as  the  object  module  or  object  file.  At 
this  point,  the  program  is  compiled 
but  not  executable.  There  are  still 
some  things  the  program  must 
know  before  it  can  run.  To  resolve 
these  unknowns  (technically 
known  as  external  references),  the 
object  file  must  be  processed  by  the 
link  program  on  the  compiler  disk. 
Output  from  the  link  program  is  the 
final  program  ready  to  execute — in 
this  case,  PROGl.EXE. 

PROGl.EXE  is  known  as  an 
executable  module  or  a  run  module. 
To  run  it,  simply  type  the  filename 
as  if  it  were  a  DOS  command: 
PROGl.  As  the  table  indicates,  a 
compiled  program  runs  three  to 
four  times  faster  than  an  interpret- 
ed one,  (The  run  module  produced 
by  the  new  version  of  the  compiler 
is  no  faster  than  that  produced  by 
the  old  version.)  The  price  to  pay 
for  speed  is  size.  The  interpreter 
version  uses  only  56  bytes  of  disk 
space,  while  the  compiled  version 
takes  more  than  23,000  bytes.     © 
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Memo  Diary 

You  may  have  noticed  that  the  year 
value  behaves  strangely  in  this  pro- 
gram from  the  December  1985  is- 
sue (p.  65).  To  solve  this,  add  the 
following  tv/o  lines,  which  were 
accidentally  omitted  from  Program 
1  (Atari  and  TI  owners  should  add 
line  1030  only): 

1030  IF  D8$  <=  D9$  THEN  lOSO 
1040  YS  =  '7"  +  RIGHT$  (STR$  (100  + 
Y8),  2) 

The  article  failed  to  mention  that 
you  should  enter  only  two  digits  for 
the  year  when  you  first  run  the 
program  (for  example,  86  for  1986). 
Entering  all  four  digits  results  in 
incorrect  days  of  the  week  for  the 
dates  you  select. 

The  Atari  and  TI  versions  (Pro- 
grams 3  and  6)  each  have  additional 
corrections.  In  both  versions,  the 
month  can  only  be  entered  as  a 
number,  not  as  a  word.  Also,  in  the 
TI  version,  incorrect  menu  choices 
crash  the  program.  Make  the  fol- 
lowing changes,  suggested  by  read- 
er David  Wentzel: 
Atari  version: 

1695  IF  LEN(MM$)  >  2  THEN  1710 
1770  IF  MMS<>MS(g-l)  *  3  +  1,  J  '  3) 
THEN  1790 

TI  version: 

815  IF  {A<1)  +  (A>5)  THEN  730 
1695  IF  LEN(MM$>  >  Z  THEN  1710 

Balloon  Crazy  For  TI  And 
IBM 

The  IBM  version  (Program  4,  p.  59) 
of  this  game  from  the  December 
1985  issue  has  a  minor  bug.  When  a 
new  screen  is  drawn  after  clearing 
alt  balloons  from  a  previous  screen, 
the  display  always  shows  three 
clowns  remaining  regardless  of 
how  many  are  actually  left.  To  cor- 
rect this,  reader  Matthew  Pomeroy 
suggests  the  following  change  to 
line  190: 

190  FOR  1  =  158  TO  158  +  (LIVES  -  2)  * 
8  STEP  8:  PUT(I,0),  TINY:  NEXT: 
GOSUB  350 


Part  of  line  390  is  missing  in 
the  TI  version  of  this  game  (Pro- 
gram 5,  p.  60).  The  line  should  read 
as  follows: 

390  CALL  SPRtTE(#3, 124, 14 
,  1  1B,MC0L) :  I  GOSUB  96 
e  ■:  CALL  DELSPRITE(« 
3)  I  I  CALL  SPRITE(»1,  1 
36, 14, 150, nCOL) 

Apple  ProDOS  Disk  Menu 

This  utility  program  from  the  De- 
cember 1985  issue  (p.  108)  gives  a 
BAD  SUBSCRIPT  ERROR  in  line  20 
when  run  because  its  first  line  is 
missing.  Add  the  following: 

5  DIM  A$(24),  L$(52) 

Also,  David  Mariotti  suggests  the 
following  improvements  which 
cause  the  selector  bar  to  skip  blank 
lines  when  there  are  fewer  than  16 
items  in  the  directory  display; 

4115  IF  CR  >  LIM  +  2  THEN  CR  =  3 
4210  IF  CR  =  4  THEN  CR  =  LIM  +  4 

Atari  Reset  Controller 

Errors  were  accidentally  introduced 
in  Program  2  for  this  article  from 
the  January  1986  issue  (p.  110) 
when  REM  statements  were  de- 
leted. The  GOTO  340  in  line  300 
should  be  changed  to  GOTO  360, 
and  the  GOTO  180  in  line  320 
should  be  changed  to  GOTO  200.  A 
good  programming  rule  to  help 
avoid  such  problems  is  never 
GOTO  a  REM  statement. 

Apple  ML  Addresses 

In  the  December  1985  "Reader's 

Feedback"  column,  there  is  an  error 
in  line  20  of  the  ProDOS  routine  for 
finding  the  starting  address  of  ma- 
chine language  programs  (p,  18). 
The  statement  GOTO  15  should  be 
GOTO  20. 

Atari  Lightning  Renumber 

The  author  of  this  program  from 
the  October  1985  issue  (p.  103)  has 
provided  a  fix  for  a  bug  that  causes 
the  program  to  sometimes  miss  in- 
ternal  line   number  references   in 


program  lines.  Line  810  should  be 
changed  to  read  as  follows: 

810  DATA  200,177,203,201,22,240,10, 
201,155,240 

Skyscape 

In  addition  to  the  small  correction 
published  in  last  month's  "Capute!" 
column,  there  are  a  number  of  cor- 
rections required  for  the  Atari  ver- 
sion, and  additional  changes  to  the 
Commodore  64,  Apple,  and  TI  ver- 
sions. In  the  Atari  version,  the  fol- 
lowing lines  need  to  be  corrected  as 
shown: 


ffl 520  FDR  ZZ= 

CHR* (RF 

QDTD  54 

El  1000  IF  ABS 

RINT  0 

HG  1730  IF  P  (X 

,6) >MS 

!F  2590  IF  ABS 

RINT  a 

CE  2600  GOSUB 
THEN 
KS2610  BOSUB 
ID  195 


1  TO  40:PRINT 
+32) ; : NEXT  ZZ: 
0 

(LL) >90  THEN  P 
0«:Q0T0  9B0 
,6)<K1  AND  P(X 

THEN  1760 
<LL>  >90  THEN  P 
OSiBOTD  25B0 
2260s  IF  Z»»"N" 
2560 

2S10:(a«-"5":BD 
0 


In  the  Commodore  64  version, 
the  reinput  option  of  the  latitude 
change  feature  does  not  work  cor- 
rectly. Change  the  THEN  2480  at 
the  end  of  line  2570  to  THEN  2530. 

In  the  Apple  version,  the  day 
of  the  week  is  incorrect  after  the 
date  is  first  entered.  To  correct  this, 
add  GOSUB  1670  between  the 
HTAB  5  and  the  GOSUB  1295  in 
line  800. 

In  the  TI-99/4A  version,  the 
reinput  option  of  the  change  lati- 
tude feature  does  not  work  correct- 
ly. Change  the  THEN  2410  at  the 
end  of  line  2490  to  THEN  2460. 
Also,  the  DOWN-S  in  the  string  in 
line  500  should  read  DOWN-N. 
The  TI  version  states  that  Extended 
BASIC  is  required,  but  does  not 
mention  that  expansion  memory  is 
also  required.  TI  readers  who  are 
interested  in  modifications  neces- 
sary to  use  the  progrm  without 
memory  expansion  should  write  to 
COMPUTE!  for  details.  @ 
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COMPUTE'S 
Author  Guide 


Most  of  the  following  suggestions  serve  to  improve 
the  speed  and  accuracy  of  publication.  COMPUTE!  is 
primarily  interested  in  new  and  timely  articles  on  the 
Commodore  64/128,  Atari,  Apple,  IBM  PC/PCjr, 
Amiga,  and  Atari  ST.  We  are  much  more  concerned 
with  the  content  of  an  article  than  with  its  style,  but 
articles  should  be  clear  and  well-explained. 

The  guidelines  below  will  permit  your  good  ideas 
and  programs  to  be  more  easily  edited  and  published: 

1.  The  upper  left  corner  of  the  first  page  should 
contain  your  name,  address,  telephone  number,  and 
the  date  of  submission. 

2.  The  following  information  should  appear  in  the 
upper  right  comer  of  the  first  page.  If  your  article  is 
specifically  directed  to  one  make  of  computer,  please 
state  the  brand  name  and,  if  applicable,  the  BASIC  or 
ROM  or  DOS  version(s)  involved.  In  addition,  please 
indicate  the  memofy  recjuiremenfs  of  programs. 

3.  The  underlined  title  of  the  article  should  start 
about  2/3  of  the  way  down  the  first  page. 

4.  Following  pages  should  be  typed  normally,  ex- 
cept that  in  the  upper  right  corner  there  should  be  an 
abbreviation  of  the  title,  your  last  name,  and  the  page 
number.  For  example:  Memory  Map/Smith/2. 

5.  All  lines  within  the  text  of  the  article  must  be 
double-  or  triple-spaced.  A  one-inch  margin  should  be 
left  at  the  right,  left,  top,  and  bottom  of  each  page.  No 
words  should  be  divided  at  the  ends  of  lines.  And 
please  do  not  justify.  Leave  the  Unas  ragged. 

6.  Standard  typing  paper  should  be  used  (no  eras- 
able, onionskin,  or  other  thin  paper)  and  typing 
should  be  on  one  side  of  the  paper  only  (upper-  and 
lowercase). 

7.  Sheets  should  be  attached  together  with  a  pa- 
per clip.  Staples  should  not  be  used. 

8.  If  you  are  submitting  more  than  one  article, 
send  each  one  in  a  separate  mailer  with  its  own  tape 
or  disk. 

9.  Short  programs  (under  20  lines)  can  easily  be 
included  within  the  text.  Longer  programs  should  be 
separate  listings.  It  is  essential  that  we  have  a  copy  of 
the  program,  recorded  twice,  on  a  tape  or  disk.  If  your 
article  was  written  with  a  word  processor,  we  also  ap- 
preciate a  copy  of  the  text  file  on  the  tape  or  disk. 
Please  use  high-quality  10  or  30  minute  tapes  with 
the  program  recorded  on  both  sides.  The  tape  or  disk 
should  be  labeled  with  the  author's  name,  the  title  of 
the  article,  and,  if  applicable,  the  BASIC/ROM/DOS 
version(s).  Atari  tapes  should  specify  whether  they  are 
to  be  LOADed  or  ENTERed.  We  prefer  to  receive  Ap- 
ple programs  on  disk  rather  than  tape.  Tapes  are  fairly 
sturdy,  but  disks  need  to  be  enclosed  within  plastic  or 


cardboard  mailers  (available  at  photography,  station- 
ery, or  computer  supply  stores). 

10.  A  good  general  rule  is  to  spell  out  the  num- 
bers zero  through  ten  in  your  article  and  write  higher, 
numbers  as  numerals  (1024).  The  exceptions  to  this 
are:  Figure  5,  Table  3,  TAB(4),  etc.  Within  ordinary 
text,  however,  the  zero  through  ten  should  appear  as 
words,  not  numbers.  Also,  symbols  and  abbreviations 
should  not  be  used  within  text:  use  "and"  (not  &), 
"reference"  (not  ref.),  "through"  (not  thru). 

11.  For  greater  clarity,  use  all  capitals  when  refer- 
ring to  keys  (RETURN,  TAB,  ESC,  SHIFT),  BASIC 
words  (LIST,  RND,  GOTO),  and  three  languages 
(BASIC,  APL,  PILOT).  Headlines  and  subheads 
should,  however,  be  initial  caps  only,  and  emphasized 
words  are  not  capitalized.  If  you  wish  to  emphasize, 
underline  the  word  and  it  will  be  italicized  during 
typesetting. 

12.  Articles  can  be  of  any  length — from  a  single- 
line  routine  to  a  multi-issue  series.  The  average  article 
is  about  four  to  eight  double-spaced,  typed  pages. 

13.  If  you  want  to  include  photographs,  they 
should  be  either  5X7  black  and  white  glossies  or 
color  slides. 

14.  We  do  not  consider  articles  which  are  submit- 
ted simultaneously  to  other  publishers.  If  you  wish  to 
send  an  article  to  another  magazine  for  consideration, 
please  do  not  submit  it  to  us. 

15.  COMPUTE!  pays  between  $70  and  $800  for 
published  articles.  In  general,  the  rate  reflects  the 
length  and  quality  of  the  article.  Payment  is  made 
upon  acceptance.  Following  submission  (Editorial  De- 
partment, COMPUTE!  Magazine,  P.O.  Box  5406, 
Greensboro,  NC  27403)  it  will  take  from  four  to  eight 
weeks  for  us  to  reply.  If  your  work  is  accepted,  you 
will  be  notified  by  a  letter  which  will  include  a  con- 
tract for  you  to  sign  and  return.  Rejected  manuscripts 
are  returned  to  authors  who  enclose  a  self-addressed, 
stamped  envelope. 

16.  If  your  article  is  accepted  and  you  have  since 
made  improvements  to  the  program,  please  submit  an 
entirely  new  tape  or  disk  and  a  new  copy  of  the  arti- 
cle reflecting  the  update.  We  cannot  easily  make  revi- 
sions to  programs  and  articles.  It  is  necessary  that  you 
send  the  revised  version  as  if  it  were  a  new  submis- 
sion entirely,  but  be  sure  to  indicate  that  your  submis- 
sion is  a  revised  version  by  writing,  "Revision"  on  the 
envelope  and  the  article. 

17.  COMPUTE!  does  not  accept  unsolicited  product 
reviews.  If  you  are  interested  in  serving  on  our  panel 
of  reviewers,  contact  the  Review  Coordinator  for 
details. 
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COMPUTErs  Guide 
To  Typing  In  Programs 


Before  typing  in  any  program,  you 
should  familiarize  yourself  with  your 
computer.  Learn  how  to  use  the  key- 
board to  type  in  and  correct  BASIC 
programs.  Read  your  manuals  to  un- 
derstand how  to  save  and  load  BASIC 
programs  to  and  from  your  disk  drive  or 
cassette  unit.  Computers  are  precise — 
take  special  care  to  type  the  program 
exactly  as  listed,  including  any  neces- 
sary punctuation  and  symbols,  except 
for  special  characters  as  noted  below. 
To  help  you  with  this  task,  we  have 
implemented  a  special  listing  conven- 
tion as  well  as  a  program  to  help  check 
your  typing — the  "Automatic  Proof- 
reader." Please  read  the  following 
notes  before  typing  in  any  programs 
from  COMPUTEt.  They  can  save  you  a  lot 
of  time  and  trouble. 

Commodore,  Apple,  and  Atari 
programs  can  contain  some  hard-to- 
read  (and  hard-to-type)  special  charac- 
ters, so  we  have  developed  a  listing 
system  that  indicates  the  function  of 
these  control  characters.  (There  are  no 
special  control  characters  in  our  IBM  or 
TI-99/4A  lisHngs.)  You  will  find  Com- 
modore and  Atari  special  characters 
within  curly  braces;  do  not  type  the  brac- 
es. For  example,  (CLEAR)  or  {CLR} 
instructs  you  to  insert  the  symbol 
which  clears  the  screen  on  the  Atari  or 
Commodore  machines.  For  Commo- 
dore, Apple,  and  Atari,  a  symbol  by 
itself  within  curiy  braces  is  usually  a 
control  key  or  graphics  key.  If  you  see 
{A},  hold  down  the  CTRL  key  and 
press  A.  This  will  produce  a  reverse 
video  character  on  the  Commodore  (in 
quote  mode),  a  graphics  character  on 
the  Atari,  and  an  invisible  control  char- 
acter on  the  Apple,  Commodore  com- 
puters also  have  a  special  control  key 
labeled  vnth  the  Commodore  logo, 
Graphics  characters  entered  with  the 
Commodore  logo  key  are  enclosed  in  a 
special  bracket  that  looks  like  this: 
\<A>].  In  this  case,  you  would  hold 
down  the  Commodore  logo  key  as'you 
type  A.  Our  Commodore  listings  are  in 
uppercase,  so  shifted  symbols  are  un- 
derlined, A  graphics  heart  symbol 
(SHIFT-S)  would  be  listed  as  S,'  One 
exception  is  {SHIFT-SPACE}.  When 
you  see  this,  hold  down  SHIFT  and 
press  the  space  bar.  If  a  number  pre- 
cedes a  symbol,  such  as  (5  RIGHT},  (6 


S},  or  [<8  Q>],  you  would  enter  five 
cursor  rights,  six  shifted  S's,  or  eight 
Commodore-Q's.  On  the  Atari,  inverse 
characters  (printed  in  white  on  black) 
should  be  entered  after  pressing  the 
inverse  video  key. 

Since  spacing  is  sometimes  impor- 
tant, any  more  than  two  spaces  will  be 


listed.  For  example,  {6  SPACES}  means 
to  press  the  space  bar  six  times.  Our 
listings  never  leave  a  space  at  the  end  of 
a  line,  instead  moving  it  to  the  next 
printed  line  as  {SPACE}.  For  your 
convenience,  we  have  prepared  this 
quick-reference  chart  for  the  Commo- 
dore and  Atari  special  characters: 


Atari  400/800/XL/XE 


Wtien  you  see 

{CLEAR} 

{UP> 

{DOWN} 

{LEFT} 

{RIQHT} 

{BACK  S} 

{DELETE} 

{INSERT} 

{DEL  LINE} 

{INS  LINE} 

{TAB} 

{CLR  TAB} 

{SET  TAB} 

{BELL} 

{ESC} 


Type 


ESC 
ESC 
ESC 
ESC 
ESC 
ESC 
ESC 
ESC 
ESC 
ESC 
ESC 
ESC 
ESC 
ESC 
ESC 


SHIFT  < 
CTRL  - 
CTRL  = 
CTRL  + 
CTRL  « 
DELETE 
CTRL  DELETE 
CTRL  INSERT 
SHIFT  DELETE 
SHIFT  INSERT 
TAB 

CTRL  TAB 
SHIFT  TAB 
CTRL  2 
ESC 


tf  Clear  Screen 

t  Cursor  Up 

J-  Cursor  Down 

«•  Cursor  Left 

■y  Cursor  Right 

4  Backspace 

CI  Delete  ctiaracter 

U  Insert  character 

Q  Delete  line 

n  Insert  line 

►  TAB  key 

B  Clear  tab 

□  Set  tab  stop 

Q  Ring  buzzer 

^  ESCape  key 


Press: 


See; 


SHIFT 


CLR/HOME  i 


-J 


CLRIHOME 


[shift J  I  t"cRSR  i    [    n 

I  crsr] 


Commodore  PET/CBM/VIC/64/1 28/1 6/+4 

WhenVbu 
Read: 

{  n  I 

{  F2  ) 

i  F3  J 

{  M  I 

{  F5  i 

{  F6  ) 

(  F7  ! 

(  FS  } 


When  Ybu 
Read: 

{CLR} 
{HOME) 

(UP) 

{DOWN} 

{LEFT) 

(RIGHT) 

{RVSj 

{OFF} 

{BLK] 

{WHT) 

(RED) 

(CYN) 

(PUR) 

jGRN) 

{BUJ) 

jYEL} 


Press: 


See: 


CTRL 

3 

CTRL 

1      ^ 

CTRL 


CTRL 

6 

CTRL          7 

CTRL          g 

m 


SHIFT 

a 

«    1 

SHIFT 

fs 

fT 

SHIFT         f7 

* 
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The  Automatic  Proofreader 

We  have  developed  a  series  of  simple, 
yet  effective  programs  that  can  help 
check  your  typing.  Type  in  the  appro- 
priate Proofreader  program  listed  be- 
low, then  save  it  for  future  use.  On  the 
VIC,  64,  or  Atari,  run  the  Proofreader  to 
activate  it,  then  enter  NEW  to  erase  the 
BASIC  loader  (the  Proofreader  remains 
active,  hidden  in  memory,  as  a  machine 
language  program).  Pressing  RUN/ 
STOP-RESTORE  or  SYSTEM  RESET 
deactivates  the  Proofreader.  You  can 
use  SYS  886  to  reactivate  the  VIC/64 
Proofreader,  or  PRINT  USR(1536)  to 
reenable  the  Atari  Proofreader.  On  the 
Apple,  the  Proofreader  automatically 
erases  the  BASIC  portion  of  itself  after 
you  activate  it  by  typing  RUN,  leaving 
only  the  machine  language  portion  in 
memory,  it  works  with  either  DOS  3.3 
or  ProDOS.  Disable  the  Apple  Proof- 
reader by  pressing  CTRL-RESET  before 
running  another  BASIC  program.  The 
IBM  Proofreader  is  a  BASIC  program 
that  simulates  the  IBM  BASIC  line  edi- 
tor, letting  you  enter,  edit,  list,  save,  and 
load  programs  that  you  type.  Type 
RUN  to  activate. 

Once  the  Proofreader  is  active,  try 
typing  in  a  line.  As  soon  as  you  press 
RETURN,  either  a  decimal  number  (on 
the  Commodore),  a  hexadecimal  num- 
ber (on  the  Apple),  or  a  pair  of  letters 
(on  the  Atari  or  IBM)  appears.  The 
number  or  pair  of  letters  is  called  a 
checksum.  Try  making  a  change  in  the 
line,  and  notice  how  the  checksum 
changes. 

All  you  need  to  do  is  compare  the 
value  provided  by  the  Proofreader  with 
the  checksum  printed  in  the  program 
listing  in  the  magazine.  In  Commodore 
listings,  the  checksum  is  a  number  from 
0  to  255.  It  is  set  off  from  the  rest  of  the 
line  with  rem.  This  prevents  a  syntax 
error  if  the  checksum  is  typed  in,  but 
the  REM  statements  and  checksums 
need  not  be  typed  in.  It  is  just  there  for 
your  information. 

In  Atari,  Apple,  and  IBM  listings, 
the  checksum  is  given  to  the  left  of  each 
line  number.  Just  type  in  the  program 
one  line  at  a  time  (without  the  printed 
checksum)  and  compare  the  checksum 
generated  by  the  Proofreader  to  the 
checksum  in  the  listing.  If  they  match, 
go  on  to  the  next  line.  If  not,  check  your 
typing:  You've  made  a  mistake.  On  the 
Commodore,  Atari,  and  Apple  Proof- 
readers, spaces  are  not  counted  as  part 
of  the  checksum,  so  be  sure  you  type 
the  right  number  of  spaces  between 
quote  marks.  The  Commodore  and 
Atari  Proofreaders  do  not  check  to  see 
that  you've  typed  the  characters  in  the 
right  order,  so  if  characters  are  trans- 
posed, the  checksum  still  matches  the 
listing.  Because  of  the  checksum  meth- 


od used,  do  not  type  abbreviations, 
such  as  ?  for  PRINT.  The  IBM  Proof- 
reader is  the  pickiest  of  all;  it  will  detect 
errors  in  spacing  and  transposition.  Be 
sure  to  leave  Caps  Lock  on,  except 
when  typing  lowercase  characters. 

IBM  Proofreader  Commands 

Since  the  IBM  Proofreader  replaces  the 
computer's  normal  BASIC  line  editor,  it 
has  to  include  many  of  the  direct- mode 
IBM  BASIC  commands.  The  syntax  is 
identical  to  IBM  BASIC.  Commands 
simulated  are  LIST,  LLIST,  NEW, 
FILES,  SAVE,  and  LOAD.  When  listing 
your  program,  press  any  key  (except 
Ctrl- Break)  to  stop  the  listing.  If  you 
type  NEW,  the  Proofreader  prompts 
you  to  press  Y  to  be  sure  you  mean  yes. 
Two  new  commands  are  BASIC 
and  CHECK.  BASIC  exits  the  Proof- 
reader back  to  IBM  BASIC,  leaving  the 
Proofreader  in  memory.  CHECK  works 
just  like  LIST,  but  shows  the  checksums 
along  vrith  the  listing.  After  you  have 
typed  in  a  program,  save  it  to  disk. 
Then  exit  the  Proofreader  with  the 
BASIC  command,  and  load  the  pro- 
gram in  BASIC  as  usual  (this  replaces 
the  Proofreader  in  memory).  You  can 
now  run  the  program,  but  you  may 
want  to  resave  it  to  disk.  The  version  of 
your  program  that  you  resave  from 
BASIC  will  take  up  less  space  on  disk 
and  will  load  faster,  but  it  can  no  longer 
be  edited  with  the  Proofreader.  If  you 
want  to  convert  a  program  to  Proof- 
reader format,  save  it  to  disk  with  SAVE 
"filename" , A. 

Special  Proofreader  Notes 
For  Commodore  Cassette 
Users 

The  Proofreader  resides  in  a  section  of 
memory  called  the  cassette  buffer, 
which  is  used  during  tape  LOADs  and 
SAVEs.  Therefore,  be  sure  to  press 
RUN/STOP-RESTORE  to  get  the  Proof- 
reader out  of  the  way  before  saving  or 
loading  a  program.  If  you  want  to  use 
the  Proofreader  with  tape,  run  the 
Proofreader,  then  enter  these  two  lines 
exactly  as  shown,  pressing  RETURN 
after  each  one: 

A$= 'TROOFREADER.T":B$ -="{10 

SPACES  }";FOR  X  =  l  TO  4:A$=A$ 

+  B$:NEXT 
FOR  X  =  886  TO  1018:A$  =  A$-)-CHR$ 

<PEEK(X)):NEXT:OPEN  1,1,1,A$: 

CLOSEl 

Then  insert  a  blank  tape  and  press  RE- 
CORD and  PLAY  to  save  a  special  ver- 
sion of  the  Proofreader.  Anytime  you 
need  to  reload  the  Proofreader  after  it 
has  been  erased — for  example,  after 
you  reload  a  paritally  completed  pro- 
gram— just  rewind  the  tape,  type 
OPENl:CLOSEl,   then  press   PLAY. 


You'll  see  the  message  FOUND 
PROOFREADER. T,  but  not  the  familiar 
LOADING  message.  Don't  worry;  the 
Proofreader  is  in  memory.  When 
READY  comes  back,  enter  SYS  886. 


Program  1:  VIC/64 
Proofreader 

By  Charles  Brannon,  Program  Editor 

10    PRINT" CCLR} PLEASE   WAIT.,.": 

FORI=886TO10ia :READA:CK=CK+ 

A;POKEI,A:NEXT 
20    IF    CK<>  17539    THEtJ    PRIST" 

{D0WN}Y0U  hade  an  error": PR 

INT " IN  DATA  STATEMENTS . " : EN 

D 
30  SYS886:PRINT"{CLR) {2  DOWN}P 

ROOFREADER  ACTIVATED. ": NEW 
40  DATA  173,036,003,201,150,20 

8 , 001 , 096 , 141 , 1 51 , 003 ,173 
50  DATA  037,003,141,152,003,16 

9,150,141,036,003,169,003 
60  DATA  141,037,003,169,000,13 

3,254,096,032,087,241,133 
70  DATA  251,134,252,132,253,00 

8,201,013,240,017,201,032 
80  DATA  240,005,024,101,254,13 

3,254,165,251,166,252,164 
90  DATA  253,040,096,169,013,03 

2,210,255,165,214,141,251 
100  DATA  003,206,251,003,169,0 
00,133,216,169,019,032,210 
110  DATA  255,169,018,032,210,2 

55,169,58,032,210,255.166 

120  DATA  254,169,000,133,254,1 

72,151,003,192,087,208,006 

130  DATA  032,205,189,076,235,0 

03.032,205,221,169,032,032 

140  DATA  210,255,032,210,255,1 

73.251,003.133,214.076,17  3 

150  DATA  003 


Program  2:  Atari 
Proofreader 

By  Charles  Brannon,  Program  Editor 

tee    8RAPHICS    0 

110    FDR     I-1S36    TO     170aiRE 

AD    fltPOKE     I,AlCK-CK+fl 

I  NEXT     I 
120    IF    CKO19072    THEN    ?    " 

Error     in    DATA    St»t«mB 

ntm.   Chwck  Typing. "i 

END 
130  A«U5R<153&) 
140  ?  I?  "Automatic  Proof 

rmmdmr    Nom  Activatad. 

■I 

150  END 

160  DATA  104,160,0,185,26 

,3,201,69,240,7 
170  DATA  200,200,192,34,2 

08,243,96,200, 169,7  4 
180  DATA  153,26,3,200,169 

,6, 193,26,3. 162 
190  DATA  0,189,0,228,157, 

74,6,232,224, 16 
200  DATA  208,245,169,93,1 

41,78,6, 169,6, 141 
210  DATA  79,6,24,173,4,22 

8, 105, 1, 141,95 
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Program  3:  IBM  Proofreader 

By  Charles  Brannon,  Program  Editor 

BC   la    'Autofliatic   Prcsof reader   Ver 

Sinn  3.0  (Lines  205,206  ad 

ded/190  dGletBd/470,490  ch 

anged  -From  V2.0) 

U  100  DIM  L»(500) ,LNUM(500)sCOL 

OR  0,7, 7: KEY  DFF:CLS:MflX= 

0:LNUM (05 =63536! 
?K   110  ON  ERROR  GOTO  120:  KEY  15, 

CHR»C4)+CHR«(70) :0N  KEY < 1 

5)  BOSUB  640: KEY  (15)  ON: 

QOTO  130 
SE  120  RESUME  130 

BJ  130  DEF  SEB=!<H40:W=PEEK(8<H4fl) 
!H  140  ON  ERROR  GOTO  650:PRINT:P 

RINT"Proo-f reader  Ready.  " 
K8  150  LINE  INPUT  L«!  Y=CSRLIN-IN 

T(LEN(L»>/W)-1: LOCATE  Y, 1 
C*  160  DEF  SEB=0:POKE  1050, 30:  PO 

KE  1052,34: POKE  1054, 0:PD 

KE  10S5,79:POKE  1056, 13:P 

OKE  1057, 28: LINE  INPUT  L* 

J DEF  SESiIF  L«»""  THEN  15 

0 
iC  170  IF  LEFT«(L*,1)="  "  THEN  L 

*-MID»<L*,2):60T0  170 
NN  180  IF  VftL(LEFT$(L«,2)  )=0  ftND 
MID*(Lt,3,l)="  "  THEN  L» 

«MID«(L»,4) 
SI  200  IF  ABC(L»J>57  THEN  260  'n 

o  line  number,  there-fore 

command 
JB  205  BL*INSTR(L*,  "  "}:IF   BL=0 

THEN  BL«=L»:G0T0  206  ELSE 
BL*-LEFT« (L«, BL-1 ) 
GK  206  LNUM-=VftL(BL«):TEXT*=MID«( 

L«, LEN (STR* (LNUM) ) +1 ) 
06  210  IF  TEXT*=""  THEN  SDSUB  54 

0:IF  LNUM-LNUM(P)  THEN  GO 

SUB  560: GOTO  150  ELSE  150 
RB  220  CKSUM=0;FDR  1  =  1  TO  LENtL* 

) ! CKSUM= (CKSUM+flSC (MID» (L 

»,I))«I)  AND  255:NEXT:L0C 

ATE  Y.lsPRINT  CHR*(65+CKS 

UM/16)+CHR»(65+(CKSUM    AND 
15))+"    "+LS 
JE  230    SaSUB   540:  IF    LNUM(P)=LNUM 
THEN   L*<P)-TEXT»r(3OT0    13 

0    'replace   line 
CL  240    GOSUB   580: GOTO    150    'inser 

t   the   line 
flD  260    TEXT»="":FOR    1=1    TO   LEN(L 

•) ; A-ASC (MID* (L», I ) ) : TEXT 


•-=TEXT*+CHR»(A+32*(fi>96  A 

ND  A< 123)): NEXT 
LP  270  DELIMITER=INSTR(TEXT*,  "  " 
) : COMMAND»=TEXT»: ARQ«=" " t 
IF  DELIMITER  THEN  COMMAND 

•-LEFT* (TEXT*, DELIMITER-1 
) iARG«-MID»(TEXT«, DELIMIT 

ER+1)  ELSE  DELIMITER-INST 

R(TEXT»,CHR»(34)) : IF  DELI 

MITER  THEN  COMMAND»=LEFT* 
(TEXT*, DELIMITER-1 ) j  ARB»= 

MID* (TEXT*. DELIMITER) 
FC  2B0  IF  COMMAND*<>"HST"  THEN 

410 
ID  290  OPEN  "scrn:"  FOR  OUTPUT  A 

S  «1 
LH  300  IF  ARG«=""  THEN  FIRST=0:P 

-MAX-1:QDTQ  340 
IJ  310  DELIMITER=INSTR(ARB»,"-") 

I  IF  DELIMITER=0  THEN  LNUM 

->VAL(ARQ*);QDSUB  540:  FIRS 

T-P:QOTO  340 
BP  320  FIRST=VAL  (LEFT*  (ARQ»,  DELI 

MITER) ) ! LAST=VAL (MID* ( ARQ 

*,DELIMITER+1)) 
EC  330  LNUM-FIRST:  GOSUB  540:  FIRS 

T"p! LNUM-LAST: QOSUB  540: I 

F  P-0  THEN  P-MAX-1 
6D  340  FOR  X=FIRST  TO  PsN*=MID*( 

3TR*tLNUM(X) ) ,2)+"  " 
U   350  IF  CKFLAQ=0  THEN  A«="":BD 

TO  370 
PF  360  CK5UM=0:A»=N*+L»(X) :FOR  I 

-1  TO  LEN(A»):CKSUM-(CKSU 

M+ASCCMID»(A», I))«I)  AND 

255: NEXT: A*=CHR» (6a+CKSUM 

/14)+CHR*(65+(CKSUM  AND  1 

5))+"  " 

PRINT  #1,A«+N*+L*(X) 
IF  INKEY*<>""  THEN  X=P 
NEXT  : CLOSE  •I:CKFLAB»0 
GOTO  130 

IF  COMMAND»="LLIST"  THEN 
OPEN  "IptlS"  FOR  OUTPUT  A 
S  #1:B0T0  300 
IF  COMMAND«=" CHECK"  THEN 
CKFLAQ-llBOTO  290 
IF  COMMAND«<>"SAVE"  THEN 
4S0 

GQSUB  600: OPEN  ARQ*  FOR  O 
UTPUT  AS  #1:ARQ*»"":Q0T0 
300 

IF  CDMMAND«<>"LOAD"  THEN 
490 

GOSUB  600: OPEN  ARB*  FOR  I 
NPUT  AS  #l:MAX-0sP-0 
WHILE  NOT  E0F(1):LINE  INP 
UT  #1,L*JBL-INSTR(L»,"  " ) 
I BL*-LEFT* (L*, BL-1 ) I LNUM ( 
P>  -VAUBL*)  I L*  <P>  -MID*  (L* 
,LEN(STR*(VAL(BL*)) )+l>:P 
-P+isWEND 
KK  4B0  MAX=P!  CLOSE  #l:aOTO  130 
U  490  IF  COMMAND«="NEW"  THEN  IN 
PUT  "Erame  program  -  Are 
you  murB";L*lIF  LEFT«(L«, 
l)-"y"  OR  LEFT*(L», 1)-"Y" 
THEN  M A  X-0 1  LNUM ( 0 ) -65336 
! I  GOTO  130 1 ELSE  130 
CL  500  IF  COMMAND»="BASIC"  THEN 
COLOR  7, 0,0: ON  ERROR  GOTO 
0iCLS:END 
K   510  IF  COMMAND*<>"FILES"  THEN 

520 
IH  515  IF  ARB*-""  THEN  ARB*-"A:  " 

ELSE  SEL-ii80SUB  600 
10  517  FILES  ARQ*:  SOTO  130 
DO  320  PRINT"Synt«x  error": GOTO 
130 


DO 

370 

JJ 

380 

OF 

390 

a 

400 

PD 

410 

sn 

420 

KA 

430 

CL 

440 

OE 

450 

P6 

460 

KA 

470 

10  540  P-0:  WHILE  LNUM>LNUM(P)  AN 

D  P<  MAX 1 P-P+ 1 ! WEND : RETURN 
KI1  560  MAX-MAX- 1:  FOR  X-P  TO  MAX: 

LNUM ( X)-LNUM (X+i ) S  L* (X ) -L 

* ( X  +  1 ) I NEXTt  RETURN 
6IC  SS0  MAX-MAX+lsFOR  X-MAX  TO  P+ 

1  STEP  -1:LNUM(X)"LNUM(X- 

1 ) t  L* ( X> -L* ( X-1 ): NEXTt  L» ( 

P) -TEXT*: LNUM (P) -LNUMi RET 

URN 
6*600  IF  LEFT*(ARB*,1)<>CHR*(34 

)  THEN  520  ELSE  ARG«-MID* 

(ARB*, 2) 
EE  610  IF  RIQHT»<ftRS*,U-CHR»(34 

)  THEN  ARB*-LEFT*(ARQ*,LE 

N<ARB*)-1) 
LA  620  IF  SEL-0  AND  INSTRCARG*," 

.")-0  THEN  ARS«-ARQ*+".BA 

3" 
DD  630  SEL-0  >  RETURN 
Wi  640  CLOSE  #1 1  CKFLA8-01  PRINT'S 

topped ." I  RETURN  150 

11  650  PRINT  "Error  #"5ERRtRE9UM 

E  150 


Program  4:  Apple 
Proofreader 

By  Tim  Victor,  Editorial 
Programmer 

10  C  =  0:  FOR  I  =  768  TO  76S  + 

6S:  READ  A:C  =  C  +  As  POKE  I 

,A:  NEXT 
20  IF  C  <  >  7258  THEN  PRINT  "ER 

ROR  IN  PROOFREADER  DATA  STAT 

EMENTS":  END 
30  IF  PEEK  (190  t  256)  <  >  76  T 

HEN  POKE  56,0:  POKE  57,3:  CA 

LL  1002s  GOTO  50 
40  PRINT  CHR*  (4) ; "IN#A»300" 
50  POKE  34,0:  HOME  !  POKE  34,1: 
VTAB  2:  PRINT  "PROOFREADER 

INSTALLED" 
60  NEW 

100  DATA  216,32,27,253,201,141 
110  DATA  208,60,138,72,169,0 
120  DATA  72,189,255,1,201,160 
130  DATA  240,8,104,10,125,255 
140  DATA  1,105,0,72,202,208 
150  DATA  238,104,170,41,15,9 
160  DATA  48,201,58,144,2,233 
170  DATA  57,141,1,4,138,74 
180  DATA  74,74,74,41,15,9 
190  DATA  48,201,58,144,2,233 
200  DATA  57,141,0,4,104,170 
210  DATA  169,141,96 
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imi  y  Machine  Language  Entry  Program 


For  Commodore  64  and  Apple 


Ottis  Cowper,  Technical  Editor  and  Tim  Victor.  Editorial  Progrommer  I 


"MIX"  is  a  labor-saving  utility  that  al- 
lows almost  fail-safe  entry  of  machine 
language  programs.  The  Apple  version 
runs  on  the  11,  II +,  He,  and  lie,  with 
either  DOS  3.3  or  ProDOS. 

"MLX"  is  a  new  way  to  enter  long 
machine  language  (ML)  programs  with- 
out a  lot  of  fuss.  MLX  lets  you  enter  the 
numbers  from  a  special  list  that  looks 
similar  to  BASIC  DATA  statements.  It 
checks  your  typing  on  a  line-by-line 
basis.  It  won't  let  you  enter  invalid 
characters  or  let  you  continue  if  there's 
a  mistake  in  a  line.  It  won't  even  let  you 
enter  a  line  or  digit  out  of  sequence.  For 
the  Commodore  64,  this  new  version  of 
MLX  was  first  introduced  in  the  Decem- 
ber 1985  issue.  No  version  of  64  MLX 
published  before  that  date  can  be  used 
to  enter  the  MLX-format  listings  in  this 
issue. 

Using  MLX 

Type  in  and  save  some  copies  of  which- 
ever version  of  MLX  is  appropriate  for 
your  computer  (you'll  want  to  use  it  to 
enter  future  ML  programs  from  COM- 
PUTE[).  Program  1  is  for  the  Commodore 
64,  and  Program  2  is  for  the  Apple.  For 
Apple  MLX,  it  doesn't  matter  whether 
you  save  the  program  on  a  disk  format- 
ted for  DOS  3.3  or  ProDOS.  Programs 
entered  with  Apple  MLX,  however, 
must  be  saved  to  a  disk  formatted  with 
the  same  operating  system  as  MLX  it- 
self. If  you  have  an  Apple  He  or  lie, 
make  sure  that  the  key  marked  Caps 
Lock  is  in  the  down  position. 

When  you're  ready  to  enter  an  ML 
program,  load  and  run  MLX,  It  asks  you 
for  a  starting  address  and  an  ending 
address.  These  addresses  appear  in  the 
article  accompanying  the  MLX-format 
program  listing  you're  typing.  If  you're 
unfamiliar  with  machine  language,  the 
addresses  (and  ail  other  values  you  en- 
ter in  MLX)  may  appear  strange.  In- 
stead of  the  usual  decimal  numbers 
you're  accustomed  to,  these  numbers 
are  in  hexadecimal — a  base  16  number- 
ing system  commonly  used  by  ML  pro- 
grammers. Hexadecimal — hex  for 
short — includes  the  numerals  0-9  and 
the  letters  A-F.  But  don't  worry — even 
if  you  know  nothing  about  ML  or  hex, 
you  should  have  no  trouble  using  MLX. 

After  you  enter  the  starting  and 
ending  addresses,  the  64  version  will 
offer  you  the  option  of  clearing  the 
workspace.  Choose  this  option  if  you're 


starting  to  enter  a  new  listing.  If  you're 
continuing  a  listing  that's  partially 
typed  from  a  previous  session,  don't 
choose  this  option. 

A  functions  menu  will  appear.  The 
first  option  in  the  menu  is  ENTER 
DATA.  If  you're  just  starting  to  type  in 
a  program,  pick  this.  Press  the  E  key, 
and  type  the  first  number  in  the  first 
line  of  the  program  listing.  If  you've 
already  typed  in  part  of  a  program,  type 
the  line  number  where  you  left  off  typ- 
ing at  the  end  of  the  previous  session. 
In  any  case,  make  sure  the  address  you 
enter  corresponds  to  the  address  of  a 
line  in  the  listing  you  are  entering.  Oth- 
erwise, you'll  be  unable  to  enter  the 
data  correctly.  In  the  64  version,  if  you 
pressed  E  by  mistake,  you  can  return  to 
the  command  menu  by  pressing  RE- 
TURN alone  when  asked  for  the  ad- 
dress. (You  can  get  back  to  the  menu 
from  most  options  by  pressing  RE- 
TURN with  no  other  input.) 

Once  you're  in  Enter  mode,  MLX 
prints  the  address  for  each  program  line 
for  you.  You  then  type  in  all  nine  num- 
bers on  that  line,  beginning  with  the 
first  two-digit  number  after  the  colon 
(:).  Each  line  represents  eight  data  bytes 
and  a  checksum.  Although  an  MLX- 
format  listing  appears  similar  to  the 
"hex  dump"  machine  language  listings 
you  may  be  accustomed  to,  the  extra 
checksum  number  on  the  end  allows 
MLX  to  check  your  typing.  (Apple  users 
can  enter  the  data  from  an  MLX  listing 
using  the  built-in  monitor  if  the  right- 
most column  of  data  is  omitted,  but  we 
recommend  against  it.  It's  much  easier 
to  let  MLX  do  the  proofreading  and 
error  checking  for  you.) 

When  you  enter  a  line,  MLX  recal- 
culates the  checksum  from  the  eight 
bytes  and  the  address  and  compares 
this  value  to  the  number  from  the  ninth 
column.  If  the  values  match,  the  data  is 
added  to  the  workspace  area,  and  the 
prompt  for  the  next  line  of  data  appears 
(the  64  version  gives  a  pleasant  beep  to 
indicate  that  the  line  was  entered  cor- 
rectly). But  if  MLX  detects  a  typing  er- 
ror, you'll  be  notified  of  the  mistake. 
The  64  version  will  sound  a  low  buzz 
and  display  an  error  message,  then  re- 
display the  line  for  editing,  Apple  MLX 
sounds  a  beep  to  alert  you  of  the  error 
and  then  erases  the  incorrect  line  and 
prompts  you  to  reenter  it  correctly. 

After  you  have  entered  the  last 
number  on  the  last  line  of  the  listing, 


the  Apple  version  will  return  to  the 
command  menu.  At  this  point  you 
should  immediately  choose  the  option 
S  to  save  your  data.  The  64  version 
automatically  moves  to  the  Save  option 
after  the  last  number  is  entered. 

Invalid  Characters  Banned 

In  64  MLX,  only  a  few  keys  are  active 
while  you're  entering  data,  so  you  may 
have  to  unlearn  some  habits.  You  do  not 
type  spaces  between  the  columns;  the 
new  MLX  automatically  inserts  these 
for  you.  You  do  not  press  RETURN  after 
typing  the  last  number  in  a  line;  the 
new  MLX  automatically  enters  and 
checks  the  line  after  you  type  the  last 
digit. 

Apple  MLX  is  fairly  flexible  about 
how  you  tjfpe  in  the  numbers.  You  can 
put  extra  spaces  between  numbers  or 
leave  the  spaces  out  entirely,  compress- 
ing a  line  into  18  keypresses.  But  be 
careful  not  to  put  a  space  between  two 
digits  in  the  middle  of  a  number.  MLX 
will  read  two  single-digit  numbers  in- 
stead of  one  two-digit  number  (F  6 
means  F  and  6,  not  F6).  You  must  press 
RETURN  to  enter  the  line. 

Only  the  numerals  0-9  and  the 
letters  A-F  can  be  typed  in.  If  you  press 
any  other  key  (with  some  exceptions 
noted  below),  nothing  happens  (the  64 
version  gives  a  warning  buzz  to  indi- 
cate an  invalid  keypress).  Even  better, 
MLX  checks  for  transposed  characters. 
If  you're  supposed  to  type  in  AO  and 
instead  enter  OA,  MLX  will  catch  your 
mistake. 

Editing  Features 

To  correct  typing  mistakes  before  fin- 
ishing a  line  in  the  64  version,  use  the 
INST/DEL  key  to  delete  the  character 
to  the  left  of  the  cursor.  (The  cursor-left 
key  also  deletes.)  If  you  mess  up  a  line 
really  badly,  press  CLR/HOME  to  start 
the  line  over.  The  RETURN  key  is  also 
active,  but  only  before  any  data  is  typed 
on  a  line.  Pressing  RETURN  at  this 
point  returns  you  to  the  command 
menu.  After  you  type  a  character  of 
data,  MLX  disables  RETURN  until  the 
cursor  returns  to  the  start  of  a  line. 
Remember,  you  can  press  CLR/HOME 
to  quickly  get  to  a  line  number  prompt. 
More  editing  features  are  available 
when  correcting  lines  in  which  64  MLX 
has  detected  an  error.  To  make  correc- 
tions in  a  line  that  MLX  has  redisplayed 
for  editing,  compare  the  line  on  the 
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screen  with  the  one  printed  in  the  list- 
ing, then  move  the  cursor  to  the  nus- 
take  and  type  the  correct  key.  The 
cursor  left  and  right  keys  provide  the 
normal  cursor  controls.  (The  INST/ 
DEL  key  now  works  as  an  alternative 
cursor-left  key.)  You  cannot  move  left 
beyond  the  first  character  in  the  line.  If 
you  try  to  move  beyond  the  rightmost 
character,  you'll  reenter  the  line.  Dur- 
ing editing,  RETURN  is  active;  pressing 
it  tells  MLX  to  recheck  the  line.  You  can 
press  the  CLR/HOME  key  to  clear  the 
entire  line  if  you  want  to  start  from 
scratch,  or  if  you  want  to  get  to  a  line 
number  prompt  to  use  RETURN  to  get 
back  to  the  menu. 

Apple  MLX  also  includes  some 
editing  features.  The  left-  and  right- 
arrow  keys  allow  you  to  back  up  and  go 
forward  on  the  line  you're  entering  so 
that  you  can  retype  data.  Pressing  the 
CONTROL  (CTRL)  and  D  keys  at  the 
same  time  (delete)  removes  the  charac- 
ter under  the  cursor,  shortening  the  line 
by  one  character.  Pressing  CONTROL-I 
{insert)  puts  a  space  under  the  cursor 
and  shifts  the  rest  of  the  line  to  the 
right,  making  the  line  one  character 
longer.  If  the  cursor  is  at  the  right  end  of 
the  line,  neither  CONTROL-D  nor 
CONTROL-I  has  any  effect.  To  leave 
Enter  mode,  press  the  RETURN  key 
when  MLX  prompts  you  with  a  new 
line  address. 

Display  Data 

The  second  menu  choice,  DISPLAY 
DATA,  examines  memory  and  shows 
the  contents  in  the  same  format  as  the 
program  listing  (including  the  check- 
sum). When  you  press  D,  MLX  asks  you 
for  a  starting  address.  Be  sure  that  the 
starting  address  you  give  corresponds 
to  a  line  number  in  the  listing.  Other- 
wise, the  checksum  display  will  be 
meaningless.  MLX  displays  program 
lines  until  it  reaches  the  end  of  the 
program,  at  which  point  the  menu  is 
redisplayed.  With  Apple  MLX,  you  can 
stop  the  display  and  return  to  the  menu 
by  pressing  any  key.  The  64  version 
allows  you  to  stop  the  display  and  get 
back  to  the  menu  by  pressing  RETURN, 
or  to  pause  the  display  by  pressing  the 
space  bar  (press  space  again  to  restart 
the  display). 

Other  Menu  Options 

Two  more  menu  selections  let  you  save 
programs  and  load  them  back  into  the 
computer.  These  are  SAVE  FILE  (SAVE 
DATA  in  the  64  version)  and  LOAD 
FILE;  their  operation  is  quite  straight- 
forward. When  you  press  S  or  L,  MLX 
asks  you  for  the  filename.  The  64  ver- 
sion will  follow  this  by  asking  you  to 
press  either  D  or  T  to  select  disk  or  tape. 
Those  using  the  64  version  will 
notice  the  disk  drive  starting  and  stop- 


ping several  times  during  a  load  or 
save.  Don't  panic;  this  is  normal  behav- 
ior, MLX  opens  and  reads  from  or 
writes  to  the  file  instead  of  using  the 
usual  LOAD  and  SAVE  commands. 
Disk  users  should  also  note  that  the 
drive  prefix  0:  is  automatically  added  to 
the  filename  (line  750),  so  this  should 
not  be  included  when  entering  the 
name.  (This  also  precludes  the  use  of  @ 
for  Save-with-Replace,  so  remember  to 
give  each  version  you  save  a  different 
name.) 

Remember  that  MLX  saves  the  en- 
tire workspace  area  from  the  starting 
address  to  the  ending  address,  so  the 
save  or  load  may  take  longer  than  you 
might  expect  if  you've  entered  only  a 
small  amount  of  data  from  a  long  list- 
ing. When  saving  a  partially  completed 
listing,  make  sure  to  note  the  address 
where  you  stopped  typing  so  you'll 
know  where  to  resume  entry  when  you 
reload. 

MLX  reports  any  errors  detected 
during  the  save  or  load.  For  the  64 
version,  the  standard  disk  or  tape  error 
messages  will  be  displayed.  (Tape  users 
should  bear  in  mind  that  the  Commo- 
dore 64  is  never  able  to  detect  errors 
when  saving  to  tape.)  The  64  version 
also  has  three  special  load  error  mes- 
sages: INCORRECT  STARTING  AD- 
DRESS, which  means  the  file  you're 
trying  to  load  does  not  have  the  starting 
address  you  specified  when  you  ran 
MLX;  LOAD  ENDED  AT  address, 
which  means  the  file  you're  trying  to 
load  ends  before  the  ending  address 
you  specified  when  you  started  MLX; 
and  TRUNCATED  AT  ENDING  AD- 
DRESS, which  means  the  file  you're 
trying  to  load  extends  beyond  the  end- 
ing address  you  specified  when  you 
started  MLX.  If  you  see  one  of  these 
messages  and  feel  certain  that  you've 
loaded  the  right  file,  exit  and  rerun 
MLX,  being  careful  to  enter  the  correct 
starting  and  ending  addresses. 

The  Apple  version  simply  displays 
the  message  DISK  ERROR  if  a  problem 
is  detected  during  a  Save  or  Load.  If 
you're  not  sure  why  a  disk  error  has 
occurred,  check  the  drive.  Make  sure 
there's  a  formatted  disk  in  the  drive  and 
that  it  was  formatted  by  the  same  oper- 
ating system  you're  using  for  MLX 
(ProDOS  or  DOS  3.3).  If  you're  trying 
to  save  a  file  and  see  an  error  message, 
the  disk  might  be  full.  Either  save  the 
file  on  another  disk  or  quit  MLX  (by 
pressing  the  Q  key),  delete  an  old  file  or 
two,  then  run  MLX  again.  Your  typing 
should  still  be  safe  in  memory.  If  the 
error  message  appears  during  a  Load, 
you  may  have  specified  a  filename  that 
doesn't  exist  on  the  disk. 

The  Quit  menu  option  has  the  ob- 
vious effect — it  stops  MLX  and  enters 


BASIC.  In  the  64  version  the  RUN/ 
STOP  key  is  disabled,  so  the  Q  option 
lets  you  exit  the  program  without  turn- 
ing off  the  computer.  (Of  course,  RUN/ 
STOP-RESTORE  for  the  64  or  CON- 
TROL-RESET for  the  Apple  also  gets 
you  out.)  The  64  version  will  ask  for 
verification;  press  Y  to  exit  to  BASIC,  or 
any  other  key  to  return  to  the  menu. 
After  quitting,  you  can  type  RUN  again 
and  reenter  MLX  without  losing  your 
data,  as  long  as  you  don't  use  the  clear 
workspace  option  in  64  MLX. 

The  Finished  Product 

When  you've  finished  typing  all  the 
data  for  an  ML  program  and  saved  your 
work,  you're  ready  to  see  the  results. 
The  instructions  for  loading  and  using 
the  finished  product  vary  from  program 
to  program.  Some  Commodore  64  ML 
programs  are  designed  to  be  loaded  and 
run  like  BASIC  programs,  so  all  you 
need  to  type  is  LOAD  "fikTiame",S  for 
disk  or  LOAD  "filename"  for  tape,  and 
then  RUN.  (Such  programs  usually 
have  0801  as  their  MLX  starting  ad- 
dress.) Others  must  be  reloaded  to  spe- 
cific addresses  with  a  command  such  as 
LOAD  " filename". ^,\  for  disk  or  LOAD 
"filename", I, I  for  tape,  then  started 
with  a  SYS  to  a  parficular  memory  ad- 
dress. (On  the  Commodore  64,  the 
most  common  starting  address  for  such 
programs  is  49152,  which  corresponds 
to  MLX  address  COOO.)  In  either  case, 
you  should  always  refer  to  the  article 
which  accompanies  the  ML  listing  for 
information  on  loading  and  running  the 
program.  For  the  Apple,  you  need  to 
BRUN  the  program,  or  you  may 
BLOAD  and  start  the  program  with  a 
CALL.  Again,  refer  to  the  article  accom- 
panying the  machine  language  pro- 
gram for  instrucfions. 

An  Ounce  Of  Prevention 

By  the  time  you  finish  typing  in  the  data 
for  a  long  ML  program,  you'll  have 
several  hours  invested  in  the  project. 
Don't  take  chances — use  our  "Auto- 
matic Proofi"eader"  to  type  the  new 
MLX,  and  then  test  your  copy  thorough- 
ly before  first  using  it  to  enter  any  sig- 
nificant amount  of  data.  Make  sure  all 
the  menu  options  work  as  they  should. 
Enter  fragments  of  the  program  starting 
at  several  different  addresses,  then  use 
the  Display  option  to  verify  that  the 
data  has  been  entered  correctly.  And  be 
sure  to  test  the  Save  and  Load  options 
several  times  to  ensure  that  you  can 
recall  your  work  from  disk  or  tape. 
Don't  let  a  simple  typing  error  in  the 
new  MLX  cost  you  several  nights  of 
hard  work. 

In  the  Apple  version,  line  100  traps 
alt  errors  to  line  610.  If  MLX  is  typed  in 
correctly,  then  only  disk  errors  should 
normally  be  encountered.  A  disk  error 
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message  when  you're  not  trying  to  ac- 
cess the  drive — for  example,  when  you 
first  start  entering  data — indicates  a 
typing  error  in  the  MLX  program  itself. 
If  this  occurs,  hit  CONTROL-RESET  to 
break  out  of  MLX  and  carefully  com- 
pare your  entry  against  the  printed 
listing. 


For  instructions  on  entering  those  listings, 
piease  refer  to  "COMPUTEI's  Guide  to  Typing 
In  Programs"  in  this  issuo  of  COMPUTEi. 

Program  1 :  MLX  For 
Commodore  64 

Version  by  Ottis  Cowper,  Technical 
Editor 

100  POKE  S6,50:CLR:DIM  IHS.I.J 
,A,B,A5,B$,AC7),N$  :rem  34 

110  C4=48:C6«16iC7=7:Z2=2:a4=2 
54 :Z5=255;Z6=256: 27=127 

:rera  238 

120  FA=PEEK(45)+Z6*PEEK(46):BS 

=PEEK( 55 )+Z6*PEEK( 56 ) :H5=" 
0123456789ABCDEF"  :rem  LIS 

130  R?=CHR?(13):L$="{LEFT!":S? 
="  ":D$=CHR5(20):Z$=CHR$(0 
):T?-"[13  RIGHT}"  :reni  173 

140  SD=54272:FOR  1=30  TO  SD+23 
:POKE  I,0:NEXT:POKE  SD+24, 
15: POKE  788,52     ;rem  194 

150  PRINT" {CLRl"CHR$ (142 )CHR5( 
8)!POKE  53280, 15;P0KE  5328 
1,  15  ireni  104 

160  PRINT  T5"  [HEDHRVSI 

(2  SPACES)  g8  i3i{2  SPACES}" 
SPC(2a)"(2  SPACES) [OFF] 
(BLU]  MLX  II  ErED)[RVS) 
{2  SPACES) "SPC( 28)" 
[12  SPACES) {BLU}"  :rem  121 

170  PRItJT"[3  DOWN)  (3  SPACESJCO 
MPUTEl'S  MACHINE  LANGUAGE 
(SPACE) editor! 3  DOWN}" 

:rem  135 

180  PRINT" (BLK}STARTING  ADORES 
Si4i"; :GOSUB300:SA=AD:GOSU 
B1040:IF  F  THEN180:rem  113 

190  PRINT"[BLK}{2  SPACES}ENDIN 
G  ADDRESSE43"; :GOSUB300:EA 
=AD:GOSUB1030:IF  F  THEN190 
irem  17  3 
200  INPUT" (3  down} (BLK) CLEAR  W 
ORKSPACE  [y/N]|4E";A?;IF  L 
EFT$ (A$ , 1 ) <> "Y"THEN220 

:rein  9 

210  PRINT"{2  down} ( BLU ) WORKING 

.  .  . "; :F0RI=BS  TO  BS+EA-SA+ 

7 i POKE  1,0: NEXT: PRINT" DONE 

:rem  139 

220  PRINTTAB(10)"[2  DOWN}? BLK) 

[RVS)  MLX  COMMAND  MENU 

[ DOWN) g4i": PRINT  T$"{RVS)B 

{OFF)NTER  DATA"      : rem  62 

230  PRINT  TS"[RVS)D(0FF)ISPLAY 

DATA":PRINT  T?"[RVS)L 

[OFFJOAD  DATA"       irem  19 

240  PRINT  T5"[RVS)S[0FP)AVE  FI 

LE":PRINT  T?" [RVS}Q (OFF) UI 

T{2  DOWN}  [BLK)"    :i:em  238 

250  GET  A$:IF  AS=N?  THEN25a 

:rem  127 

260  A=0:FOR  1=1  TO  5: IF  A5=HID 

$("EDLSQ",I,1)THEN  A=I : 1=5 

srem  42 

270  NEXT: ON  A  GOTO420, 610, 690, 


700, 280:GOSUB1060:GOTO250 
:rero  97 

2B0  PRINT" (RVS)  quit  ": INPUT" 
[DOWNji43ARE  YOU  SURE  [Y/N 
]";A$:IF  LEFT? ( A?, 1 ) <> "Y"T 
HEN220  ;rem  189 

290  POKE  SD+24, 0: END    : rem  95 

300  IN5=K5:AD=0:INPUTIN$:IFLEN 
(IN$)<>4THENRETURN  :rem  31 

310  B?=IN$:GOSUB320!AD=A:B$=M1 
D? ( IN$,3 ) :GOSUB320:AD=AD*2 
56+A: RETURN        :rem  225 

320  A=0:POR  J=1  TO  2:A5=MID$(B 
5  ,  J ,  1  )  :  B=ASC  {  a?  )  -C4+  C  A$  >  "  (3 
")*C7  5A=A*C6+B     :rem  143 

330  IF  B<0  OR  B>15  THEN  AD=0;A 
=-l:J=2  srem  132 

340  NEXT: RETURN        irsra  240 

350  B=INT(A/C6) : PRINT  MID5(H?, 
B+1, 1); :B=A-B*C6: PRINT  MID 
$(H5,B+1,1) ; :RETURN:rem  42 

360  A=INT(AD/Z6) :GOSUB35a:A=AD 
-A*Z6 : G0SUB3  50 : PRINT " : " ; 

: rem  32 

370  CK=INT{AD/26) :CK=AD-24*CK+ 
25*(CK>Z7) :GOTO390:rem  131 

380  CK=CK*Z2+Z5*(CK>Z7)+A 

I  rem  168 

390  CK=CK+Z5*(CK>Z5): RETURN 

:rera  159 

400  PRINT" {DOWN) STARTING  hTi^i 
"; :GOSUB300:IF  IN5<>N¥  THE 
N  GOSUB1030:IF  F  THEN400 

:  r  em  7  5 

410  RETURN  irero  117 

420  PRINT" [RVS}  enter  DATA  " tG 
OSUB400:IF  IN$=N?  THEN220 
:rem  85 

430  OPENS, 3:PRINT       :rem  34 

440  POKE198,0:GOSUB360:IF  F  TK 
EM  PRINT  IN? : PRINT" (up) 
(5  RIGHT}":  :rem  6 

450  FDR  1=0  TO  24  STEP  3:B5=S$ 
:FOR  J=l  TO  2: IF  P  THEN  B$ 
=MID?{IN5,I+J,1)  -.rem   226 

460  PRINT"  [RVS]  "B¥L$;  :  IP  K24T 
HEN  PRINT" {OFF}";   : rem  15 

470  GET  A$:IF  A?=NS  THEN470 

:rem  135 
480  IF(A5>"/"ANDA?<":")OR(A5>" 
@"ANDA$<"G")THEN540 

:rem  100 

490  IF  A$=R?  AND( (I=0)AKD(J=1) 

OR  F)THEN  PRINT  8$;:J=2:NE 

XT:I=24:GOTO5S0     :reni  46 

500  IF  A$="(H0ME)"  THEN  PRINT 
( SPACE)B5!J=2; NEXT: 1=24 :NE 
XT:F=0!GOTO440      ;rem  66 

510  IF(A5="{RIGHT}")ANDF  THENP 
RINT  B$L5; :GOTO540:rem  107 

520  IF  A5<>L5  AND  A$<>D$  OR((I 
=0)AND(J=1))THEN  GOSUB1060 
iGOTO470  trem  232 

530  A?=L?+S$+LS! PRINT  B$L5;:J= 
2-J:IF  J  THEN  PRINT  L?;:I= 
1-3  :rem  12 

540  PRINT  A?r!NEXT  J: PRINT  S5; 

:rem  2 

550  NEXT  I: PRINT: PRINT" (UP) 

[5  RIGHT}"? !XNPUT#3, IN5:IF 

IN$=N$  THEN  CLOSES :G0TO22 

0  :rem  106 

560  FOR  1=1  TO  25  STEP3;B?=MID 
?CIN$, I):GOSUB320:IF  K25 
[SPACE} THEN  GOSUB380 :A( l/3 
)=A  srem  81 

570  NEXT:  IF  AOCK  THEN  GOSUB10 

60  SPRINT "(BLK) (RVS)  ERROR: 

REENTER  LINE  643":F=l:GOT 

O440  :rem  161 


580  GOSUB1080:B=BS+AD-SA:FOR  I 

=0  TO  7: POKE  B+I, A( I ) sNEXT 

:rera  245 

590  AD=AD+8:IF  AD>EA  THEN  CLOS 

E3s PRINT" [down] (BLU)**  END 

OF  ENTRY  **{BLK){2  DOWN)" 

:GOTQ700  irem  207 

600  F=0sGOTO440         srem  84 

610  PRINT" {CLR) (DOWN) (RVS)  DIS 
PLAY  DATA  " : GOSUB400: IF  IN 
5=N?  THEN220       srem  146 

620  PRINT" [DOWN] [BLU 1  PRESS: 

(RVS} SPACE [OFF}  TO  PAUSE, 
(SPACE) {RVS} RETURN (OFF)  TO 
BREAKi43{DOWN) "   srem  241 

630  GOSUB360:B=BS+AD-SA:FORI=B 
TO  B+7:A=PEEK(I) :GOSUB350: 
GOSUB380:PRINT  S5;  srem  56 

640  NEXT: PRINT" {RVS} " ; :A=CK:GO 
SUB350:PRINT       :rera  144 

650  F=1:AD=AD+8:IF  AD>EA  THENP 
RINT" (down) (BLU)**  END  OF 
(SPACE}DATA  **":GOTO220 

:rem  170 

660  GET  A$:IF  A$=R?  THEN  GOSUB 
1080:GOTO220        :rem  65 

670  IF  A$=S?  THEN  F=F+1:G0SUB1 
080  srem  28 

680  OKFGOTO630, 660, 630 srem  224 

690  PRINT" (down) (RVS)  LOAD  DAT 
A  " :OP=1:GOTO710    :rem  31 

700  PRINT" (down) {RVS}  SAVE  FIL 
E  ":OP=0  :rem  32 

710  IN5=N$: INPUT" { DOWN )FILENAH 
EE43";IN$:IF  IN$=N5  THEN22 
0  :rem  229 

720  f=0: print" (down) [blk) (rvs) 
t(off}ape  or  [rvs}d{off)is 

K:  ME";  srem  66 

730  GET  A?:  IF  AS'»"T"THEN  PRINT 

"T[DOWN}"sGOTOS80  srem  90 
740  IF  A5<>"D"THEN730  srem  90 
750  PRINT"D(D0WN)"  s0PEIS15,8,  15 

,"I0:"sB=EA-SAsIN9="0:"-HN 

?:IF  OP  THEN810  : rem  163 
760  OPEN  1,8,8, IN5+",P,W":GOSU 

8860: IF  A  THEN220  srem  66 
770  AH=INT(SA/256) sAL=SA-(AH*2 

56):PRINT#1,CHR9(AL) ;CHR5( 

AH);  :rem  221 

780  FOR  1=0  TO  B:PRINT#i,CHR5( 

PEEK(BS+I) ); :IF  ST  THEN800 

:rem  171 

790  NEXT:CL0SEl:CLOSE15:G0TO94 

0  :rem  230 

800  GOSUB1060: PRINT" (down) 

[BLK}ERR0R  DURING  SAVE:E43 

"sGOSUB860iGOTO220  srem  61 
810  OPEN  l,8,3,IN?+",P,R":GOSU 

B860JIP  A  THEN220  srem  57 
820  GET#1,A5,B?:AD=ASC(A$+ZS)+ 

256*ASC(B5+Z5)  :IF  ADOSA  T 

HEN  F=1;GOTO850    : rem  155 

830  FOR  1=0  TO  B:GET#1,A$:P0KE 

BS+I,ASC(A5+Z$) :IF  ST  AND 

(I<>B)THEN  F=2sAD=IsI=B 

:rem  180 
840  NEXT: IF  ST<>64  THEN  F=3 

:rem  20 
350  CLOSE1:CLOSE15:ON  ABS(F>0) 

+1  GOTO960,970  :rem  12 
860  INPUT#15,A,A?:IF  A  THEN  CL 

OSEl :CL0SE15 : GOSUB1060 : PRI 

NT" (RVS) ERROR;  "AS:remll4 
870  RETURN  :rem  127 

880  POKE183,PEEK(FA+2):POKE187 

, PEEK(FA+3 ) : P0KE188,  PEEK(F 

A+4) :IFOP=0THEN920:rem  178 
890  SYS  63466 :IF(PEEK( 783 )ANDV 

)THEN  GOSUB1060; PRINT" 

(DOWN) (RVS)  FILE  NOT  FOUND 
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":GOTO690  srem   34 

900    AD=PEEK(829)+256*PEEK(830) 

!lF    ADOSA    THEN    F=l:GOT097 

0  :rem  201 
910   A=PEEK(83I)+256*PEEK(832)- 

1:F=F-2*(A<EA)-3*{A>EA):AD 

=A-AD:GOTO930  :rem  75 
920  A=SA:B=EA+l:GOSUBl010iPOKE 

780,3:SYS  63338  : rem  107 
930  A=BS:3=BS+(EA-SA)+1:G0SUB1 

0L0:ON  OP  GOTO950iSYS  6359 

1  :rem  38 
940  GOSUB1080:PRINT"{BLU}**  SA 

VE  COMPLETED  **":GOTO220 

:rem  139 

950  POKE1-47,0:SYS  63562:IF  ST< 

>54  THEN970         : rem  39 

960  GOSUB1080: PRINT" {BLU}**  LO 

AD  COMPLETED  **":GOTO220 

:rem  126 

970  GOSUB1060:PRINT"{BLK) fRVS) 

ERROR  DURING  LOAD: (DOWN) 

643"; ON  F  GOSUB9aO,990, 100 

0:GOTO220  :rem  233 

980  PRINT" INCORRECT  STARTING  A 

DDRESS  ("; :GOSUB360: PRINT" 

)":RETURN  :rem  145 

990  PRINT"L0AD  ENDED  AT  ";;AD= 

SA+AD:GOSUB360: PRINT  D5:RE 

TURN  I  rem  159 

1000  PRINT "TRUNCATED  AT  ENDING 

ADDRESS": RETURN  :rem  166 

1010  A[i=lNT{A/256):AL=A-(AH*25 

6):POKE193,AL:POKE194,AH 

: rem  95 

1020  AH=INT(B/256) :AL=B-{AH*25 

6):POKE174,AL!PQKE175,AH: 

RETURN  :rem  122 

1030  IF  AD<SA  OR  AO>EA  THEN105 

0  :rem  135 

1040  IPCAD>S11  AND  AD<40960)OR 

(AD>49151  AND  AD<53248)TH 

EN  GOSUB1080:F=0: RETURN 

:rem  104 

1050  GOSUB1060:PRINT"{RVSl  ISV 

ALID  ADDRESS  (D0WN](BLK)" 

:F=1: RETURN       : rem  2  24 

1060  POKE  SD+5,31:POKE  SD+6, 20 

8: POKE  SD, 240: POKE  SD+1,4 

:POKE  SU+4, 33       : rem  19 

1070  FOR  S=l  TO  100: NEXT :GOT01 

090  irem  90 

1080  POKE  30+5,8: POKE  SD+6, 240 

iPOKE  SD,0:POKE  SD+1 , 90 : P 

OKE  SD+4,17       :rem  132 

1090  FOR  3=1  TO  100 jNEXTs POKE 

{SPACE}SD+4,0:POKE  SD,0:P 

OKE  SD+1,0: RETURN   : rem  8 

Program  2:  MIX  For  Apple 

Version  by  Tim  Victor,  Editorial 
Programmer 

100  N  =  9:  HOME  :  NORMAL  :  PRIN 
T  "APPLE  MLX":  POKE  34,2!  0 
NERR   GOTO  &10 

110  VTAB  1:  HTAB  20:  PRINT  "STA 
RT  ADDRESS";:  GDSUB  530:  IF 
A  =  0  THEN  PRINT  CHR*  <7 
>!  GOTO  110 

120  S  =  A 

130  VTAB  2j  HTftB  20!  PRINT  "END 
ADDRESS  "j:  GDSUB  S30:  IF 
S>  =AORA=0  THEN  PR 
INT   CHR*  <7):  GOTO  130 

140  E  -  A 

130  PRINT  :  PRINT  "CHOOSE: (E)NT 
ER  DATA"?!  HTAB  22:  PRINT  " 
(D)ISPLAY  DATA":  HTAB  8:  PR 
INT  "(L5  0AD  FILE   (S}AVe  FI 


LE   (Q>UIT"!  PRINT 
160  GET  (\*s    FOR  I  =  1  TO  5:  IF 

AS  <  >  MID*  ("EDLSQ", I, 1)  T 

HEN   NEXT  :  GOTO  160 
170  ON  I  GOTO  270,220,180,200: 

POKE  34,0:  END 
180  INPUT  "FILENAME!  ";A«: 

«  <   >  '■"  THEN   PRINT 
(4 ) ; "BLOAD" ; A*; " , A" ; S 
190  GOTO  150 
200  INPUT  "FILENAME:  ";A»: 

«  <   >  ""  THEN   PRINT 
(4) ; "BSAVE";A«; ",A";S; ",L" 

fE  -  S 
210  eOTD  150 
220  BOSUB  590!  IF  B  =  0  THEN  13 

0 
230  FOR  B  =  B  TO  E  STEP  a:L  =  4 

:A  =  B:  GOSUB  5B0:  PRINT  A* 

,   .     ,  '  1-      ^ 

7:V(F 
NEXT 


IF  A 
CHR* 


IF  A 
CHR* 


240 


1)  =  P 
GOSUB  5 


250 


260 
270 

280 
290 

300 
310 


320 

330 
340 

350 
360 


370 
380 

390 

400 

410 


420 
430 

440 

450 

460 
470 


480 

490 
500 


FOR  F  =  0  TO 

EEK  (B  +  F)i 

60:V(9)  -  C 

FDR  F  =  1  TO  NiA  =  V<F)!  GD 

SUB  580:  PRINT  AS"  ";:  NEXT 

:  PRINT  8  IF   PEEK  (491S2) 

<  128  THEN   NEXT 
POKE  49168,0:  GOTO  150 
GOSUB  590!  IF  B  =«  0  THEN  15 
0 
FOR  B  =  B  TO  E  STEP  B 

HTAB  1:A  =  B:L  =  4:  GOSUB  5 
80:  PRINT  fl*;":  ";:  CALL  64 
668: A*  =  ""tP  =  0:  GOSUB  33 
0:  IF  L  =  0  THEN  150 
GOSUB  470:  IF  F  <  >  N  THEN 
PRINT  CHR»  (7) ; !  GOTO  290 
IF  N  =  9  THEN  GOSUB  5601  IF 

C  <  >  V(9)  THEN  PRINT  CHR* 

(7) ; :  GOTO  290 
FOR  F  =  1  TO  8!  POKE  B  +  F 

-  1,V!F):  NEXT  :  PRINT  :  NE 
XT  :  GOTO  150 

IF  LEN  <A«)  -  33  THEN  A*  - 
0*1 P  -  0!  PRINT  CHR*  (7); 
L  =  LEN  (A*>!0*  -  A»iO  -  Pi 
L*  =  ■•":  IF  P  >  0  THEN  L*  - 

LEFT*  (A*,P> 
R*  =  "":  IF  P  <  L  -  1  THEN 
R«  «   RIGHT*  <A«,L  -  P  -  I) 
HTAB  7:  PRINT  L«; :  FLASH  : 
IF  P  <  L  THEN  PRINT  MID*  (A 
*,P  +  1,1>!:  NORMAL  s  PRINT 

R*; 
PRINT  "  ";:  NORMAL 
K  =  PEEK  (49152) :  IF  K  <  12 
B  THEN  380 

POKE  49168, 0!K  -  K  -  128 
IF  K  -  13  THEN  HTAB  7:  PRIN 
T  A*; "  "ji  RETURN 
IF  K  -  32  OR  K  >  47  AND  K  < 

58  OR  K  >  64  AND  K  <  71  TH 
EN  A*  =  L*  +  CHR*  (K) 
P  -  P  +  1 

IF  K  "  4  THEN  A*  "  L* 
IF  K  =  9  THEN  A*  =  L* 

+   MID*  (A*,P  +  1, U 
IF  K  =  8  THEN  P  -  P  - 
0) 
IF  K  ■=  21  THEN  P  =  P  ^ 

L) 
GOTO  330 

F  =  1:D  *  01  FOR  P  =  1  TO  L 
EN  (A*):C«  ■=  MID*  (A*,P,  i): 

IF  F  >  N  AND  C«  <  >  "  "  TH 
EN   RETURN 

IF  C*  <  >  ■'  "  THEN   BOSUB  5 
20:V(F)  =  J  +  16  «  (D  =  n 
*  V<F>.D  -  D  +  1 
IF  D  >  0  AND  C*  =  "  "  OR  D 

-  2  THEN  D  =  0:F  =  F  +  1 
NEXT  t     IF  D  -  0  THEN  F  -  F 

-  1 


R*: 


R* 


+  R4 
(P  > 


(P  < 


510  RETURN 

520  a  "  ASC  (C«>!J  =  J  -  48  -  7 

*  <J  >  64) !  RETURN 
530  A  -  01  INPUT  A*: AC  =■  LEFT* 
(A*, 4):  IF  LEN  (A«)  •  0  THE 

N  RETURN 
540  FOR  P  =  1  TO  LEN  (A*):C«  = 

MID*  <A«,P, 1)!  IF  C*  <  "0" 

OR  C*  >  "9"  AND  C*  <  "A"  OR 
C*  >  "Z"  THEN  A  -  0:  RETUR 

N 
550  GOSUB  S20:A  >  A  *  16  +  J:  N 

EXT  !  RETURN 
560  C  "  INT  (B  /  256) I C  -  B  -  2 

54  »  C  -  253  t  (C  >  127) tC 

-  C  -  255  *  (C  >  255) 

570  FOR  F-lT0BiC-C»2- 
255  *  (C  >  127)  +  VeF)iC  - 
C  -  255  *  (C  >  255)1  NEXT  i 
RETURN 

580  I  -  FRE  (0)1 A«  -  FDR  I 

-  1  TO  LiT  -  INT  (A  /  16)1 
A*  -  MID*  <"01234567B9ABCD 
EF",A  -  16  «  T  +  1,1)  +  A*i 
A  =  Ts  NEXT  >  RETURN 

590  PRINT  "FROM  ADDRESS  "ji  QDS 
UB  5301  IFS>a6rE<AO 
R  A  -  0  THEN  B  -  01  RETURN 

600  B  -  S  +  8  »  INT  ( (A  -  S)  / 
8)1  RETURN 

610  PRINT  "DISK  ERROR":  GOTO  1= 
0 
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Attention  Programmers 

coMPUTEi  magazine  is  currently 
looking  for  quality  articles  on 
Commodore,  Atari,  Apple, 
and  IBM  computers  (including 
the  Commodore  Amiga  and 
Atari  ST).  If  you  have  on 
interesting  home  application, 
educational  program, 
programming  utility,  or  game, 
submit  it  to  COMPUTEI,  P.O. 
Box  5406,  Greensboro,  NC 
27403.  Of  write  for  a  copy  of 
our  "Writer's  Guidelines." 
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MLX 


Machine  Language 
Entry  Program  For  Atari 


Charles  Brannon,  Program  Editor  ■ 

MIX  is  a  labor-saving  utility  that  allows 
almost  fail-iafe  entry  of  machine  lan- 
guage programs  published  in  computei. 
You  need  to  know  nothing  about  machine 
language  to  use  MLX — it  was  designed  for 
everyone. 

"MLX"  is  a  new  way  to  enter  long 
machine  language  (ML)  programs  with 
a  minimum  of  fuss.  MLX  lets  you  enter 
the  numbers  from  a  special  list  that 
looks  similar  to  BASIC  DATA  state- 
ments. It  checks  your  typing  on  a  line- 
by-line  basis.  It  won't  let  you  enter 
illegal  characters  when  you  should  be 
typing  numbers.  It  won't  let  you  enter 
numbers  greater  than  255  (forbidden  in 
ML).  It  won't  let  you  enter  the  wrong 
numbers  on  the  wrong  line.  In  addition, 
MLX  creates  a  ready-to-use  tape  or  disk 
file. 

Using  MLX 

Type  in  and  save  MLX  (you'U  want  to 
use  it  in  the  future).  When  you're  ready 
to  type  in  an  ML  program,  run  MLX. 
MLX  asks  you  for  three  numbers:  the 
starting  address,  the  ending  address, 
and  the  run/init  address.  These  num- 
bers are  given  in  the  article  accompany- 
ing the  ML  program  presented  in  MLX 
format.  You  must  also  choose  one  of 
three  options  for  saving  the  file:  as  a 
boot  tape,  as  disk  binary  file,  or  as  boot 
disk.  The  article  with  the  ML  program 
should  specify  which  formats  may  be 
used. 

When  you  run  MLX,  you'll  see  a 
prompt  corresponding  to  the  starting 
address.  The  prompt  is  the  current  line 
you  are  entering  from  the  listing.  It 
increases  by  six  each  time  you  enter  a 
line.  That's  because  each  line  has  seven 
numbers — six  actual  data  numbers  plus 
a  checksum  number.  The  checksum 
verifies  that  you  typed  the  previous  six 
numbers  correctly.  If  you  enter  any  of 
the  six  numbers  wrong,  or  enter  the 
checksum  wrong,  the  computer  rings  a 
buzzer  and  prompts  you  to  reenter  the 
line.  If  you  enter  it  correctly,  a  bell  tone 
sounds  and  you  continue  to  the  next 
line. 

MLX  accepts  only  numbers  as  in- 
put. If  you  make  a  typing  error,  press 
the  DEL/BACK  SPACE;  the  entire 
number  is  deleted.  You  can  press  it  as 
many  times  as  necessary  back  to  the 
start  of  the  line.  If  you  enter  three-digit 
numbers  as  listed,  the  computer  auto- 
matically prints  the  comma  and  goes  on 


to  accept  the  next  number.  If  you  enter 
fewer  than  three  digits,  you  can  press 
the  comma  key,  the  space  bar,  or  the 
RETURN  key  to  advance  to  the  next 
number.  The  checksum  automatically 
appears  in  inverse  video  for  emphasis. 

MLX  Commands 

When  you  finish  typing  an  ML  listing 
(assuming  you  type  it  all  in  one  ses- 
sion), you  can  then  save  the  completed 
program  on  tape  or  disk.  Follow  the 
screen  instructions.  If  you  get  any  errors 
while  saving,  you  probably  have  a  bad 
disk,  or  the  disk  is  full,  or  you've  made 
a  typo  when  entering  the  MLX  program 
itself. 

You  don't  have  to  enter  the  whole 
ML  program  in  one  sitting.  MLX  lets 
you  enter  as  much  as  you  want,  save  it, 
and  then  reload  the  file  from  tape  or 
disk  later.  MLX  recognizes  these 
commands: 


CTRL-S 

Save 

CTRL-L 

Load 

CTRL-N 

New  Address 

CTRL-D 

Display 

To  issue  a  command,  hold  down 
the  CTRL  key  (CONTROL  on  the  XL 
models)  and  press  the  indicated  key. 
When  you  enter  a  command,  MLX 
jumps  out  of  the  Une  you've  been  typ- 
ing, so  we  recommend  you  do  it  at  a 
new  prompt.  Use  the  Save  command 
(CTRL-S)  to  save  what  you've  been 
working  on.  It  will  save  on  tape  or  disk, 
as  if  you've  finished,  but  the  tape  or 
disk  won't  work,  of  course,  until  you 
finish  the  typing.  Remember  to  make  a 
note  of  what  address  you  stop  at.  The 
next  time  you  run  MLX,  answer  all  the 
prompts  as  you  did  before — regardless 
of  where  you  stopped  typing — then  in- 
sert the  disk  or  tape.  When  you  get  to 
the  line  number  prompt,  press  CTRL-L 
to  reload  the  partly  completed  file  into 
memory.  Then  use  the  New  Address 
command  to  resume  typing. 

To  use  the  New  Address  com- 
mand, press  CTRL-N  and  enter  the  ad- 
dress where  you  previously  stopped. 
The  prompt  will  change,  and  you  can 
then  continue  typing.  Always  enter  a 
New  Address  that  matches  up  with  one 
of  the  line  numbers  in  the  MLX-format 
listing,  or  else  the  checksum  won't 
work.  The  Display  command  lets  you 
display  a  section  of  your  typing.  After 
you  press  CTRL-D,  enter  two  addresses 
within  the  line  number  range  of  the 
listing.  You  can  break  out  of  the  listing 


display  and  return  to  the  prompt  by 
pressing  any  key. 

Atari  MLX:  Machine 
Language  Entry 

Fof  Instructions  on  entering  this  listing,  pleas© 
refer  to  "COMPUTEI's  Guide  to  Typing  In 
Programs"  in  this  issue  of  computei. 

DA  100  GRAPHICS  0sDL  =  PEEK(56 
0) +25i«PEEK (561 ) +4sPD 
KE  DL-1,71:PDKE  DL+2, 

NJ110  POSITION  8,0:?  "MLX": 
POSITION  23,0:?  "EH53B 
t^.ti-^-i.Trsr"  z  PO^:E  710, 
0:  ? 

JK120  ?  "Starting  Address"; 
; INPUT  BEG:?  "  Endin 
g  Address"; ! INPUT  FIN 
■?  "Run/Init  Address" 
;: INPUT  STARTADR 

D[  130  DIM  A  (6)  ,  BUFFER*  (FIN- 
BEe+127) , T4 (20) ,F« (20 
) ,CIO» (7) .SECTOR* (128 
) ,DSKINV« (6) 

JJ  140  OPEN  #1  ,  4,0,  "K:  ":?  s? 
, "Dape  or    Eiskj"; 

811150  BUFFER«  =  CHR*(0)  :8UFFE 
R«  CFIN-BEG  +  30)=BUFFER 
$i  BUFFER* (2>=BUFFER«: 
SECTDR*=BUFFER« 

Gi:160  ADDR  =  BEG:Cia«="hhh"  :C 
ID* (4) =CHR* (170) : CIO* 
<5)="LV":CI0*(7)=CHR« 
(228) 

EJ  170  GET  #J,MEDIA:IF  MEDIA 
<>a4  AND  MEDIA068  TH 
EN  170 

PO  180  ?  CHR*  (MEDIA)  :  ?  :IF  M 
EDIAOASC  (  "T"  )  THEN  B 
UFFER*="" : GOTO  250 

PL  190  BEG  =  BEB-24!  BUFFERS  =  CH 
R« (0) : BUFFER* (2)=CHR* 
< INT(  (FIN-BEG +127)  /  12 
B)  ) 

KF  200  H=INT  {BEB/256)  :  L  =  BE(5- 
H*2S6s  BUFFERS (3) =CHR* 
(L) : BUFFER* ( 4 > =CHR* (H 
) 

EC210  PINIT  =  BEG  +  8!  H=INT  (PIN 
lT/236) :L=P1NIT-H«256 
: BUFFER* (5) =CHR« (L) : B 
UFFER* (6) =CHR« (H) 

PB  220  FDR  1=7  TO  24:READ  A: 
BUFFER* ( I ) =CHRS (A)  s  NE 
XT  liDATfl  24,96,169,6 
0,141,2,211, 169,0, 133 
, 10, 169,0, 133, 11,76,0 

1)P230  H=INT  (STARTADR/256)  :L 
=STARTflDR-H«256:BUFFE 
R*(15)-=CHR«(L)  :  BUFFER 
« ( 19) =CHR* (H> 

KL  240  BUFFER*  (23)  =CHR»  (L)  :B 
UFFER* (24) =CHR*(H> 

HI  2S0  IF  MEDIAOASC  (  "D"  )  TH 
EN  360 

00  260  ?  :?  "Boot  Eisli  or  Bi 
nary  Qi 1 e:  "  ; 

LI  270  GET  #1,DTVPE:IF  DTYPE 
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068  AND  DTYPEO70  TH 

EN  270 
BN  280  ?  CHR«  (DTYPEJ  s  IF  DTYP 

E=70  THEN  360 
P]  290  BES  =  BEG-30:  BUFFER«  =  CH 

R«  <0)  : BUFFER*  (2)=CHR« 
(INK  (FIN-BEG+127  )  /  12 

S)  ) 
KB  300  H=INT  <BEe/256)  :  L  =  BEG- 

H*256: BUFFER*  <3) =CHR* 
(L) ! BUFFER* (4) =CHR» (H 
) 
HK310  PINIT=STARTADRsH=lNT ( 

PINIT/2S6) !L=PINIT-H« 

256: BUFFER*  <5>=CHR*(L 
)  s BUFFER*  t6)=CHR* (H) 
SO  320    RESTORE     330:FOR     1=7     T 

D    30:READ    AsBUFFER*(I 

)=CHR* (A) ! NEXT     I 
Bft 330    DATA     169,0,141,231,2, 

133, 14, 169, 0,141, 232, 

2, 133, 15, 169,0, 133, 10 

, 169,0, 133, 11 ,24, 96 
08  340  H=INTCBEe/256)  :  L  =  BEG- 

H» 256: BUFFER* (8)=CHR* 
<L)  5  BUFFER* < IS) =CHR*  < 

H> 
00  350  H=INT(STARTADR/256)  :  L 

=STARTADR-H*256: BUFFE 

R« (22)=CHR* (L) : BUFFER 

* (26) "CHR* (H) 
JP  360  BRAPHICS  0:POKE  712,1 

asPOKE  710,10:PQKE  70 

9,2 

?  ADDR; "! "; :FOR  J=l  T 

O  6 

GOSUB  570: IF  N=~l  THE 

N  J=.J-1:G0T0  380 

IF  N=-19  THEN  720 

IF  N--12  THEN  LET  REA 

D=1:S0T0  720 

TRAP  410: IF  N=-14  THE 

N  ?  :?  "New  Address"; 

: INPUT  ADDR:?  : GOTO  3 

70 
00  420  TRAP  32767:  IF  NO-4  T 

HEN  480 
H 430  TRAP  430:?  :?  "Displa 

y  :FrDm";  :  INPUT  F  :  "^     ," 

To"! : INPUT  TjTRAP  327 

67 
BL  440  IF  F<BE6  OR  F>FIN  OR 

T<BEG  OR  T>FIN  OR  T<F 
THEN  ?  CHR* (253) ; "At 
least  ";BEG; " ,  Not  M 

ore  Than  ";FIN:BOTD  4 

30 
ITK  450  FOR  I=F  TO  T  STEP  6:? 
:?  I !  ":  "; : FDR  K  =  0  ID 
5: N=PEEK (ADR (BUFFER* 

)+I+K-BEG) :T*="000":T 

* (4-LEN<STR* (N> ) ) =STR 

*  (N) 
11(1460     IF     PEEK(764)<255     THEN 
GET     ltl,A:POP     :  POP     :? 
:GDTO     370 
FN  470     ?     T*;  "  ,  ■';  :NEXT     K:?     CH 

R* ( 126) ; :NEXT     I: ?     : 7 

:GaTO  370 
6(1480  IF  N<0  THEN  ?  :  GOTO  3 

70 
NH  490  A(J>=N:NEXT  J 
JH  500  CKSUM  =  ADDR-INT  (ADDR/2 

56)t256:F0R  1=1  TO  6: 

CKSUM'=CK5U«  +  A  (  I  )  s  CKSU 

M=CKSUM-256« (CKSUM>25 

5) sNEXT  I 
KK310  RF-lZSsSOUND  0,200,12 

,a:GOSUB  570:SOUND  0, 

0,0,05RF'-0:  ?  CHR*(126 

) 
CN  320  IF  NOCKSUH  THEN  ?  :? 


K  370 

HF  380 

BF  390 

DI  400 

Al  4  10 

KS30 


Fl  540 


HB  550 

en  560 
Fi  570 
PH  580 

FB  590 


£B  600 

HL  610 

6N  620 

Ej  630 

(III640 

EB  650 

EH  660 

JK670 

K  680 

11(1690 

PI  700 

Kd  7  10 

FF720 

OJ  730 
OK  740 

16  750 

M  760 

SF770 

»]   780 
n  790 


PO  800 
DJ  810 


NF  820 
IF  830 
FD840 


m  850 


HF  860 
FO  870 


"Incorrect"! CHR* (253 
)j:7  tSDTD  370 
FOR  W=15  TO  0  STEP  -1 
I  SOUND  0, 50,  10, W:NEXT 

U 
FOR  I-l  TO  61POKE  ADR 
(BUFFER*) +ADDR-BeG+I- 
I , A( I ) iNEXT  I 
ADDR-ADDR+6: IF  ADDR<= 
FIN  THEN  370 
GOTO  710 
N>0| Z>0 

GET  #1 , A: IF  A-155  OR 
A-44  OR  A=32  THEN  670 
IF  A<32  THEN  N"-AlRET 
URN 

IF  A0126  THEN  630 
GOSUB  690] IF  I-l  AND 
T-44  THEN  N--li7  CHR* 
(126) I iGDTO  690 
GOTO  570 

IF  A<4S  OR  A>S7  THEN 
580 

?  CHR* (A+RF) ; : N=N*10+ 
ft-48 

IF  N>255  THEN  ?  CHR* ( 
253) ;: A=126: GOTO  600 
Z-Z+1:IF  Z<3  THEN  580 
IF  Z=0  THEN  ?  CHRe(25 
3)  f  SBOTD  570 
?  ",  ■';  5  RETURN 

POKE  752,1: FDR  1=1  TO 

3: ?    CHR»(30) ; : GET    #6 
,T:IF     T044     AND     TOSS 

THEN    ?    CHR«<A) ( : NEXT 

I 
POKE  752,0:?  "  ";CHR» 
( 126)  J  iRETURN 
GRAPHICS  0:POKE  710,2 
6:PDKE  7i2,26:P0KE  70 
9,2 

IF  MEDIA=ASC( "T")  THE 
N  890 

REH  ■.>«» 

IF  READ  THEN  ?  :?  "Lo 
ad  File":? 

IF  DTYPEO70  THEN  104 
0 

?  :?  "Enter  AUTORUN.S 
YS  for  automatic  use" 
I?  :?  "Enter  filename 
": INPUT  T» 

F*'=T«:IF  LEN(T*)>2  TH 
EN  IF  T* ( 1 ,2) <>"D: "  T 
HEN  F*="D:  ■■:  F*  (3>=T« 
TRAP  870:CLOSE  «2:0PE 
N  «2,8-4«READ,0,F*: ? 
J?  "Working..." 
IF  READ  THEN  FOR  1=1 
TO  6:GET  #2,A:NEXT  Is 
GOTO  S20 

PUT  #2,255:PUT  *t2,255 
H-INT (BEG/ 256) :L=BES- 
H»256:PUT  #2,L:PUT  #2 
,H! H"I NT (FIN/256) : L=F 
IN-H*256:PUT  #2,L!PUT 

«2,  H 
GOSUB  970; IF  PEEK(195 
>>1  THEN  870 
IF  STARTADR=0  OR  READ 

THEN  850 
PUT  »2,224:PUT  «2,25P 
UT  #2,225:PUT  «2,2:H= 
INT (STARTADR/256) : L=S 
TARTADR-H«256:PUT  #2, 
L:PUT  *2,H 


"  trying 

F«:CLOSE 
7  60 

REM  mniL-s. 

IF  READ  THEN  ? 

ad  Tape" 

?  !  ?  s  ?  " 

nd  Tape . " 

AY  ";: IF 

EN  ?  "S.  R 

?  !?  "Pre 


to  access":' 
*2!?  :GOTD 


Insert,  Rewi 
J  ?  "Press  PL 
NOT  READ  TH 
ECORD" 

ss  l;]=*<ll!i:  Kh 


CLOSE  »2:0PE 
READ, 128, "C: 
orki  ng .  . .  " 
: IF  PEEK( 195 
960 

TRAP  32767:? 
d  .  "  :  ?  :  ?  s  I  F 
N  LET  READ=0 


CLOSE  #2:? 
"! IF  READ 
LET  READ=0 


TRAP  32767 
"Fini  shed 
THEN  ?  : ? 
:GOTO  360 
END 
?  "Error  ";PEEK(195); 


NC  880 

HKa90 

KI  900 


LP  910 
JH  920 

HH  930 
HH  940 


HF950 
CD  960 


RB970 


Efl  980  X-32:REM  Flle#2,*20 

EF  990  ICCDM-B34J ICBADR-836: 
ICBLEN"a40i ICSTAT^aSS 

1(0  1000  H=INT  (ADR  (BUFFER*)  /2 
56) :L=ADR (BUFFER*) -H 
*256:PQKE  ICBADR+X,L 
:POKE  ICBADR+X+1,H 

FH  1010  L  =  FIN-BEG  +  1  :  H=INT  (L/ 
256) :L=L-H* 256: POKE 
ICBLEN+X, Lt POKE  ICBL 
EN+X+1 ,H 

1111020  POKE  ICCOM  +  X,  U-4«RE 
ADs A=USR (ADR (CIO*) , X 
> 

BB  1030  POKE  195,PEeK(  ICBTAT 
) : RETURN 

Kftl040  REM  K■^JAf■l: 


•n  ready: 
TRAP  960: 
N  #2,8-4» 
"  :  ?  :  ?  "  W 
GOSUB  970 
) >1  THEN 
CLOSE  #2: 
"Finish 
READ  THE 
■GOTO  360 
END 

?  s?  "Err 
5) ) "  wh»n 
ting  boot 
OSE  tt2ie0 
REM  an 


or  "(PEEK (19 
readi  ng/wri 
tape":?  j CL 

TO  890 


n Z    opened       REni>=o 


6C  1050 
HE  1060 

FC  1070 

EC  1080 

CP  1090 

AC  1100 


LE  1110 

LI  1  120 
10  1  130 


PL  1140 

AH  1  150 

DM  1  160 

FB  1  170 

EH  1  180 

DH  1  190 

31  1200 

U  1210 


IF  READ 
?  :?  "Fo 

Dr  i  ve  1 
GET  ttl.A 
D  A089 
?  CHR* (A 
EN  1100 
?  :?  "Fo 
:XIO  254 
t?  "Form 
:? 

NR=INT( ( 
/1 28)  :BU 
G+2) =CHR 

THEN  ? 
I  SOTO  11 
?  "Writi 
FOR  1=1 
IF  READ 
220:BUFF 
7)=SECTa 
SECTOR** 
8-127) 
GOSUB  12 
IF  PEEK( 
HEN  1200 
NEXT  I 
IF   NOT 
D 

?  !?  :LE 
0  360 
?  "Error 
ess. " : ? 
rmatti  ng 
REM 


THEN  1100 
rraat  Disk  In 
?  (Y/N> : "; 

:  IF  A<  >7a  AN 

THEN  1070 

) : IF  A=7B  TH 

rmatti  ng .  .  .  " 
,*2,0,0, "D:" 
at  Complete" 

FIN-BES+127> 

FFeR*(FIN-BE 

* (0) : IF  READ 

"Reading  ..." 

20 

ng.  .  .  " 

TO  NR:S=I 

THEN  GOSUB  1 

ER*  C  1*128-12 

R»:GOTO  1160 

BUFFER* ( I»12 

20 
DSTATS)<>1  T 


READ  THEN  EN 

T  READ«=0:GOT 

on  di  sk  ace 
May  need  fo 
":GOTO  1040 


122     COMPITTE)     February  1986 


Free  Publieatiaiis 

Use  the  handy  order  form  in  the  tax  package  to 
obtain  free  IRS  pubhcations  on  over  90  different  tax 
topics. 


^jl,l/iPlCn,',  /.' 


A  PUBLIC  SERVICE  MESSAGE  PROM  THE  INTERNAL  REVENUE  SERVICE 


IL  1220 

REM  Drive  ONE 

is  1230 

IH  1240 

REM  Pass  buf-fer  in  S 

ECTOR* 

np  1250 

REM  sector  «  in  varl 

able  5 

EG  1260 

REM  READ=1  for  read, 

KJ  1270 

REM  REflD=0  for  write 

at   1280 

BASEi=3t256 

EL  1290 

DUN IT=BASE+i ! DCDMND= 

BASE+2:DSTATS=BASE+3 

NL  1300 

DBUFL0=BASE+4:DBUFH1 

-BASE+5 

AI  1310 

DBYTLO=BASE+a: DBYTHI 

-BASE+9 

JA  1320 

DAUXl=BASE+10i  DAUX2" 

BASE4.il 

n  1330 

REM  DIM  DSKINV«(4) 

CA  1340 

DSKINV»="hLS"}DSKrNV 

4(4) =CHR« (22B) 

PF  1350 

POKE  DUNIT, 1: A=ADR(S 

ECTOR*)  :H" I  NT (A/ 256) 

sL-A-256tH 

SP  1360 

POKE  DBUFHI.H 

CO  1370 

POKE  DBUFLO.L 

PD  1380 

POKE  DC0MND,87-5tReA 

D 

POKE  DAUX2, INT(S/256 

M  1390 

)(POKE  DAUXl, S-PEEK( 

DAUX2) t256 

KJ  1400 

A=USR(ADR(DSKINV*) ) 

KE  1 4 1 0 

RETURN 

0 

MODEMS 


Team  Modem SZIS.SS 

VoH5t2 I7S-95 

HajesSOO -- 137  00 

Hayes  1  ?00.  365.00 

CompuServe  1 7  95 

MPP1000E     *^*'"  69  95 

1030  55  95 


COMMODORE 

T064 S  5J  95 

1670 185  95 

MileyMo  56  95 

Master  Modem 49.95 

We&Tnflge   59  95 

Tf^ic  iMrnifig  39  95 


PRINTERS 


L190 /Ira  ctor/ Atari  inlartace. 
U9(l  /  Tractiu/IBM  Inlerface . 

CQmrejt  ZZO  Alari/Commodore         ,  . . 

HSBQ  Letterfcl 

RXM S201.00 

JX80 M9,00 

FXia5 455  DO 

LQlSOOlPAR)  950,00 

sgio™«.mi';RO.n.i.cs.„,o.95 

SGIOC  235  00 

SGt5  369  OO 

SD10     .  3?1J5 

SBIS 44100 

SRIO 469  00 

SR15 58?  OO 

fflwArtype 299.95 

CITIZEN  „,,  ^ 

MSP15 «9  DO 

MSPZO 43900 

MSP5S M9  00 


EPSON S235.0D 

J35.00 

99.00 

,  .  ,  319,00 


RX100 3?9O0 

FH5 332,00 

UeO 511  00 

LOI500ISER)  999,00 


1092 
1093 
3151 


Ok'matelO 
Okmule  ?0 
IB? 
192 
193 


OKIDATA 


Pnntef  RibEXHis  •  Dust  Covers 
Available 


369  00 

425,00 

,   425,00 

S170  95 
210  00 
.219,95 
349  95 
515  00 
64095 

808/NlD....^.'^^!'.'!...S149.95 

1080       199  95 

13aO  259  95 

1385  295  00 


PAPER 


DISK  DRIVES     T     COMPUTERS 


WMtl!  20  LB 

250OSI1I5  Li!  Edge         ,  SJi.gs 

1O0OSM5UI  Edge  .  14-95 

SOOStilsLa;  Ec^e  9  95 

ASSORTED  PASTELS 

JSOOStilsLai  Edge  524,95 

lOOOShlsla!  Edge  24,95 

50DSmsLaz  Edje  ".95 

Making  Labels  lOOOOTV  9,95 


SOFTWARE 


520ST 

Haba  Wills 

Haba  Checkmmder 

Haba  Word 

Hippo-C 

V  l-P  ProlESSMinal    ,. 

inlocwn  games  - 

He« 

C-1ZB 

Jane 

Word  Pio  128 
WotdWiiler  I2B 

Piinl  Sbop 
Grapliics  Library  I 
GrapUicS  library  II 
Alan  Paperclip  . 

C-64  Paperclip 

C-64  Paperclip/Sptll 
Alan  Homebak 


29.95 
49.95 
4995 
49,95 

,  79,95 
.  29.95 
.  29.95 


,  32.95 
6595 
4995 

28  50 
1750 
,17,50 
36  95 
45,95 
57,95 
31  95 


"Where  Prices  are  Bom,  Not  Raised." 

WTE  HOUSE 
COMPUTER 


P.O.  Box  4025,  Wlliiamsport,  PA  17701 


CALLTOLLFREE      in  pa  call 
1-800-351 -3442         1-717-322-7700 


InrlusGI 
1050 

Happy  1050 
Happy  EnJiancei 


ATARI 


$198.00 
,149  95 
3199S 
155  95 


1  f^  ATARI 

S2flST;RGB 

520/ST/Mimo 

800XL     


^COMMODORE  ,„„„„ 
Indus  GT  S229  00 


1541 
1571 
1572. 

MSDDual   . 
Enhancer  2000 


165  95 
249  95 
375  95 

459.95 
1 75  95 


DISKETTES 


lONUS  5V<     3'/!         1 

SS/OD     S     9.50- 

DS/,DD 13  50    - 

NO  LABEL  (wiib  Pen  5  Fiipn-lliel 

SS/OD S    10.SO    - 

DS/DD  14,50     - 

MAXELL 


HD1  S 

M02 

MEMOREX 

SS/OD  S 

DS/DD 

FTSO/MSS/OD. 

FF50/2DSS/DD. 

FFSO/ZODS/DD. 


15,95   32,95 
1995   38,95 


12  50  29  95 

16  50  34  95 

-  58.9S 

36, SS  - 

42. 9S  - 


AI  Oiskettei  CariY  A  Lrlelime  Warranlv 


INTERFACES 


ATARI 

1160  49,95 

UPBINT/PORT             .     .      49  95 
UPRlNT/ieK.  69  95 

UPRIHT/64K 79.95 


COMMODORE 


PPI 
G-Wi; 
lYMAC 
Xeiec/SK 


S39  95 
48  95 
54  95 
64  95 


I30XE 


.  CALL 

CHA. 

-  579.95 

139.95 


COMMODORE 


C-6-! 

C-12B 


S139  95 
27595 


MONITORS 


TEKNIKA 


MJ-10. . 
li1J-!2. . 

1802 
1901 
1902 

SM124.. 
SCI  224. 


COMMODORE 


S17B95 
..254.95 


ATARI 


5185.95 

CALL 

259  95 

SI74  95 
.  335.95 

ZENITH 

ZVM122 S74  95 

ZVM123 74  95 


1205  **^^ 

1260 

1201 

AMDEK 

aooG 

300A     

31 OA 
Co'or  330 
Color  510 . 
Color  600 .    . 
Color  700 
Color  710 

SYLVANIA 
13"Ccl(ilTV/BGB     . 


nLA 

TTLG 


SI  25  00 
79  95 
9995 

SI '7  03 
127  00 
145  OO 
17595 
339,95 
399  00 
469  00 
539,00 

5325,00 

CdorTV/BGB CALL 

SAMSUNG 

S95  0O 


JK 


SC100 


SAKATA 


89  95 


5179,00 


4%        WW 


AMERICAN  EXPRESS  S% 


pfopairj  casJi  ord«5 Qnw  jaoo  >n  TW  C<>«t*rii?flli!' 
US*  APO  and  FPO  orders  add  U  00  t»i  hunfl. 
red  Fof  Pnonry  Msi^aaltO.OOuerhuiriied  Free 
•J«pf3<ng  tcr  PA  res«l«itE.  PA  ie$)4?nts^dd  6"t 
utft»  iMx.  All  detective  prcxtLMiis  mus,t  tuv«  9 


Here  are  152  reasons  to 
buy  at  Elek-Tek,  not  to 
mention  the  fastest 
delivery  anywhere. 


BERNOULLI  BOX 
(Modular) 

1.  10  meg  Vj  heighi  Dnve  tor 
IBM-PC/XT/AT  & 
compatibles 1675 

2.  20  meg  Vi  height  Drive  for 
IBM-PC/XT/AT  & 
compatibles 2335 

3.  Non  BMlatjIe  InterfacB  Card  ...  104 

4.  Bootable  Interlace  Card  . . .  234 

5.  10  meg  cartridges  for  above 

(3  pak  special) 125 

6.  Head  Cleaning  Kit ...59 


HARD  DRIVES 


^  Dysan 


Internal  Hard  Disk  Subsystems 

7.     10  MEGABYTE 500 

3.    20  MEGABYTE 600 

Each  system  includes: 

•  Micro  Science  Drive 

•  Adaptek  Controller 

•  2  cables 

•  Documentation 

•  Dysan  lyr  limited  warranty 

•  For  use  in  IBM  PC,  XT  or  mcs! 
compatibles 


PRINTER  BUFFERS 


9.    DDP-16 

64K  Par/fei 70 

QUADRAM 

10.  QRMP8 

8K  Parallel/Parallel 125 

11.  QRMPSS 

8K  Parallel/Sena] 139 

12.  QRMSP8 

8K  SeriafParallel 139 

13.  QRMSS8 

SK  SeriaUSeral 139 


POWER  PROTECTORS 


14.  PoMcrMtte  PGeOO^g 

6  outlet  Surge  Suppressor ...  30 

15.  ISOBAR  8 
8  outlet  Surge  Suppressor ...  50 
IBM  Is  a  tndenurk  o(  Intemitloriil  Bmlrwn 


Save  30%  to  43% 

off  Manufacturer  Suggested  Retail  prices  on 

EPSON  •  Okidata  •  Star 
•  TOSHIBA  •  DIABLO  • 


EPSON 
FX  SS 
EPSON^ 

16.  LX80 S215 

17.  LX90 230 

18.  RX  100+   310 

19.  FX85 340 

20.  FX185 475 

21.  LQ  800  parallel CALL 

22.  DX10  Daisy  Wheel  10CPS  .  .230 

23.  DX20  Daisy  Wheel  20CPS   .320 

24.  DX-35  Daisv  Wheel  35CPS  .640 


TOSHIBA 

47.  Toshiba  P341 CALL 

48.  Toshiba  P351 990 

49.  Toshiba  P1340 CALL 

50.  Toshiba  P321    CALL 


OigDATA 

FULL  LINE  AVAIU^BLE 
FULL  LINE  AVAILABLE 


.CALL     ► 


.CALL 


PRODUCTS  FOR  IBM-PC 


25.  Amdek  3iaA 

Amber  Montor t  ISO 

26.  Generic  Multl 

Multifunction  Boara,  64K    129 

27.  Genertc  Multl  3S4K 
Mullilunciion  Board.  384K.  . .  .163 

28.  AST  Six  Pak  + 

MuWunction  Board.  BAK   ....  225 

29.  AST  Sl)c  Pak  +  (loaded) 
Mullrlunction  Board  384K  .  . . .  Z79 

30.  AST  Megaplus  II 
Mullifu"c'-o"  Board,  64K 270 

31 .  Quadrem  Quadtnand 
MulMuncrion  Board,  OK   .....  195 

32.  Ouadrain  Quadboard 

Mulli  Board.  64K/3S4K   ..210/2S7 

33.  Ordild  Tech. 

PC  TurtKJ  186 570 

34.  Paradise 

Modular  Graphics  Card  ....  .290 

35.  Hercules 

Monochrome  Card    329 

36.  Herculea  Cok>r 

CdIo'  Graphc  Card 170 

37.  Novation  490605-1 
24Ci03PS:,"c  Mite  Software  ..620 

38.  Novation  490592-1 

iJOOa  :n;efr.sj  ^^odem  No  scC^are  .  150 

39.  Novation  490603 

"2  Card  Modem  24008PS 

No  Sdt/are 425 

40.  Hayes  1200B 

Internal  modem  w/software  .  .  .  359 

41.  AT&T  4000 

aoonzOO  Exl  Modem   335 

42.  Hayes  1200 

External  modem   380 

43.  Hayes  2400 

External  modem   599 

44.  US  Robotics  Courier  2400 
Ext  24006  Smart  Modem  . .  .460 

45.  US  Robotics  Telpac 
Teiecomm  SoH^vare 75 

46.  Toshiba  ND  04D 
"1  ht  DSDD  Dsk  Drive 90 

Machine*  Corp. 


SPECIAL  PURCHASE! 

Diablo  D-36  Daisy  Wheel  35CPS 

Mtr.  Sugg.  Ret.  $1495 

eiek-Tsk  Price  $450 


PRODUCTS  FOR  APPLE 


51.  Toshiba  HND  04DT 

Vi  Height  DSDD  Disk  Drive  .  S  70 

52.  U— Print  IIC-16K 

Par  Interlace  external   85 

53.  GiXM>pler  PLUS 

Graphics  Interlace  80 

54.  Bulfered  Grappler 

16K  Buffer  (Expand  to  64K)  . .  150 

55.  Kensington  System  Saver 
Fan  and  Surge  Suppr    69 

56.  Super  CooHrtg  Fan 

Fan  and  Surge  Suppr    29 

57.  Gamma 

Disk  Contrdter  Card 48 

58.  Gamma  II 
SSDskDnveforll.  llellplus.,,12S 

59.  Gamma  tic 

SS  Disk  Driw  for  lie 125 

60.  RanaELITEZ 

DSSD  Disk  Drive 335 

61.  RanaELITES 

DSDD  Disk  Drive 420 

62.  ERAM  80 

80  col:  64K  RAM  for  lie  ...115 

63.  Novation  Apple  Cat  ii 

300  Baud  Modem 200 

64.  Novation  212 

300/1200  Baud  Modem    ..390 

65.  Nov  49059112 

Mod.  &  Soft,  for  Macintosh  .  CALL 

66.  IHayes  Micromodem  lie 

300  Baud  Modem 145 

67.  Hayes  Smartmodem  lie 

300  Baud  Modem  for  lie .  .240 

68.  Wico  501030 

Analog  Joystick 36 

69.  Amdek  Monitors CALL 

70.  Zenith  Monitors CALL 


HUGE  SAVINGS  ON  DISKETTES 


o 


maxell 


3M  SOIsfV       wabacH         MEMOREX      ngCa 


3^"  SSDD 
DSDD 

SV*"  SSDD 
DSDD 

SSDD96TPI 

DS0D95TPI 

5y4''DSD0HD 
(For  IBM  m 

8" SSDD" 
8"  DSOD" 

"UntormaHed 


Z3.00 

22.00 

23.00 

23.00 

20.00 

Z9.0D 

29.00 

30.00 

35.00 

24.00 

_ 

17.00 

14.Q0 

14.00 

13.00 

11.50 

11.50 

11.00 

21.00 

18.00 

18.00 

16.00 

12.50 

14.00 

12.00 

24.00 

24.00 

24.00 

_ 

_ 

_ 

36.00 

33.00 

35.00 

_ 

_ 

_ 

_ 

33.00 

29.00 

29.00 

— 

24.00 

— 

24.00 

22.00 

29.00 

25.00 

19.00 

26.00 

32.00 

29.00 

— 

20.00 

— 

— 

HEWLEn-PACKARD 


71.  .HP-41CV $168 

72.  HP-41CX   245 

73.  Optical  Wand 95 

74.  Card  Reader 145 

75.  Printer 283 

76.  Exl  Memory  Module   60 

77.  Exl  Function  Module 60 

78.  Time  Module  60 

79.  HP-IL  Loop  Module   95 

80.  Digital  Cassette  Dnve 400 

81.  Printer/Plotter  (HP-IL) 335 

82.  HP-9114A 

Disk  Drive 600 


IHewiett-Packard 
QUAD  MEMORY  MODULE 

^25  Mrr.  Sugg.  Rgl.  S75 

Upgrades  the  HP41C  to  the 
power  of  the  HP41CV 

SLIMLINE  Shirtpocket  Styled 
Power  Packed  Prograrrtmabte 
LCD  PROBLEM  SOLVERS 

83.  HP-IICScienlilic 56 

84.  HP-ISC  Scienlific 90 

85.  HP-12C  Financial 90 

86.  HP-16C  Programmer 90 


a 

'diixm 

HP-ThinkJet 


Call  tor  Quantity  pricing  lor  tO  boxes  or  more. 


HP-2225B 
S350 

87.  HP-71 B  Computer $399 

88.  HP-82400A 

Series  70  card  reader ....  125 

89.  HP-82401A 

HP-IL  interface 95 

90.  HP.82402A 

4K  memory  module 60 

91.  HP-82700A 

8K  memory  module 1 50 

92.  HP-82441A 
Assembly/Forth 120 

93.  HP-824eOA 

HP-71  malh  pac 75 

94.  HP-82482A 

HP-71  finance  pac 60 

95.  HP-824e3A 

Surveying  Pac 1 20 

96.  HP-824B4A 

Curve  Fitting 75 

97.  HP-82485A 

Text  Editor 60 

98.  HP-824SBA 

DaiaCom.  Pac 120 


3M 

DATA 

CARTRIDGES 


147.  DC100    S  14.00 

148.  DC300A 18.00 

149.  DC300XL 21.00 

150.  DC300XUP 22.00 

151.  DC600A   23.50 

152.  DC1000 15.00 

Call  for  Quantity  pricing 
for  10  cartridges  or  more 


CAU  TOLL  FREE  800-621-1269  EXCEPT  Illinois,  Alaska 


CANADIAK  TOLL  FREE  800-458-9133 


ELEK-TEK,inc. 


6557  N.  Lincoln  An..  Clttcigo.  IL  6DG4S 
(3121  831-7B00  (312>  6r?-7fi«J 


I   Cere  AcCSlrTv-ac   Mr   O-a   SlSOO  ViM  o' MastfrfC^rd  ijy  .Vi,l  o- Phon«  Wlii  Caineri  Crwcn   Mon  O'fl     =*rS0i^ai  Cfi»t*  (T 
*'<i  iDciiBflAtJd  WDOIsliwm  ;ak.  Ml,  PB  ,  CmatJi  km  tiOOO  f.-j;  iro-^l  ST  CM  ••  ■(fd'ijUpa  I  H»ndl  Si'pmiiis  M  IL 
aaat#M*i3  7iti8ji  PncttsuOj  !ol;^a^B«  WHrTE  tor  Vm  caiiiog  HEIUBM  PQLPCV  D*'«i  vwi  0"fy  Man  c'Dfljct*  i«pl»cM 
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ATARI 
JP  130XE 

ATARI  130XE  Super 

Computer  Package 

130XE  Computer 

1050  Disk  Drive 

1027  Pnnlei 

Alariwnter 

CALL 

ATARI  PRINTER 

INTERFACES 

Uprinl  A 54.95 

Upnnl  AW/iaK,  ..79,95 
U print  AW/'64K.  ..99,95 
MPP  1150   5995 

INDUS  GT 
DISK  DRIVE...  Call 
ATARI  130XE  SUPER 
PRINTER  PKGS. 

SG-IO  Primer 

and  U-Prmi  A  ...  279 
Panasonic  1091 

andU-Prinl  A  ...  309 
Super  Printer  Pacitages 
have  no  earfra  shipping 
Charges  or  credit  card 
surcharges  when  ship- 
ped irt  Corrlinemal  USA 

ATARI 130XE 
SOFTWARE 

BRODERBUHD 

PiinlShop 2895 

Kaialeka 2095 

l^iint  Shop 
3ra|)tl  I  II,  or  III...  19  95 

Prinl  SHOP  Comp 27  95 

INFQCQIVI 

See  CommodOfs  64  sec- 
ficn  lor  Items  and  prices 

ELECTRONIC  ARTS 

Arction  II 24  95 

Aichon  1995 

Seven  Cil  ol  Gold  . , ,  2<)  95 

Skylox 2495 

PinPall  Const 24.95 

One  on  One 24,95 

MICHOPROSE 

SileniSeivice 23,95 

Gunstlip 23,95 

Accrojel 23,95 

F-15  Sirikt  Eagle  ...  2395 
Kennedy  Approach  .,  2395 
OSS 

Basic  XE-Carl 52.95 

MAC  65  XL-Carl 49  95 

Action-Cart , , ,  49  95 

Basic  XL-Cart 39  95 

All  Tool  Kits  2095 

BATTERIES  INCLUQED 

HomePak 34  95 

Paper  Clip 39.95 

R-Graph 34.95 

SYNAPSE 

Syncalc 32.95 

Synlile 32,95 

Syntrend 25,95 

Syncalc  Templaies ...  16  95 
Loderunnet  Rescue  . .  20.95 

MindiKtieel  27  95 

Essen 27.95 

Brimstone 27.95 

SSI 

See  Commodore  64  sec- 
fion  lor  ilems  and  prices 

MISCELLANEOUS  130XE 

Hacker 1995 

AriiBi  Cross Ctry  ...  1995 
Fligtil  Simulator II  ...  34  95 

Ullimall  37,95 

yilmalM 37.95 

Universe 69.95 

Leiler  Perfect 39  95 

DataPerlecl 39  95 

»Halley  Prolecl 27  95 

Dultima  I 2395 

sIV 4195 

MMG  Basic  Comp  ,,    6995 


ATARI 
520ST* 

Atail  520ST- 

RGB  System.. .Call 
Atari  520ST-Mono- 
chrome Sys.  ..Call 
SF311DS/DD 
1  Megabyte  Disk 

Drive Call 

We  warranty  all 
520ST  computers 
purchased  Irom 
CompulAbilily  lor 

ninety  days. 
'Please  call  lor 
stock  availability 

on  Atari  ST 
products  before 
ordering  by  mall. 
ATARI  520ST 
SOFTWARE 
NASA  SYSTEMS 

Hippo  C  M96 

Haba  Write 5195 

HabaCalc 54  95 

Haba  Graph  54  95 

HataFiie 5195 

MISCELLANEOUS  ST 
VIP  Prolcssional  ....129  95 

Ullimall 39  95 

Petty  Mason 34  95 

Degas 27  95 

Farenhcit45i 34.95 

Amazon 34.9S 

Hacker 29.95 

The  Rnal  Wcrd 94.95 

OeiaVu 3995 

PC/lnlerCOm 89.95 

Hen 2?  95 

Crimson  Crown   27  95 

Mudpies 2395 

Kings  Quest II   Call 

Eato Call 

Borrowed  Time .3495 

Personal  Prolog 7995 

Personal  Pascal 64  95 

Zoomracks Call 

Wi-Term 54  95 

Regent  Woid  34  95 

INFOCOM  ST 

Deadline 34  95 

Starcross 34  95 

Zork  1,  II,  or  IH 29,95 

Witness  27  95 

Sospended 34  95 

Planelfall  ...27  95 

Sorcerer 2995 

Seaslalker 2795 

Culttiroats 27,95 

Hitcbiker 27  95 

Suspect 29,95 

Wishbringer 27.95 

Infidel 29.95 

Enchantei 2795 

Spellbreakei 34,95 

Mind  Forever  Voy   ...34  95 

AMIGA 

AMIGA  PERSOr^AL 
computer* 

Call  (Or  Hardware  and 
add-on  peripherals  prices 

AMIGA  SOFTWARE 

Archon 27  95 

Artie  Fo»   27  95 

Deluxe  Painl 59  95 

Fin  Cookbook 34  95 

One  on  One 27  95 

Seven  Cities 27,95 

Skyfox 2795 

Hacker 2995 

Mindshado*  29,95 

'Please  call  lor 

avallablllly  ol  Amiga 

products  beiore 

ordering  by  mail. 
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We  stock  hundreds  of 
programs  for  the  Apple, 
Atari,  C-64  and  IBM. 
If  you  don't  see  it  listed  here 
don't  hesitate  ^ 

f  ^..ii^T<7':^4LASER  3000 
PERSONAL 
COMPUTER 

Apple  2'  Connpatible 
Built-in  Microsolt 

Basic  in  ROM 
Bulll-in  RGB  and 

Composile  Video 
Built-in  BO  Column 

Display 
Built-in  Centronics 

Printer  Interface 
Built-in  Numenc  Keypad 
192K  RAM 
Bundled  ProQuctivily 

Soltwaro 
Disk  Drive 
Allttiisand  more  for  the 

amazing  LOW  price 


APPLE 

PRINTER 

INTERFACES 

AND  BOARDS 

ApricOrn  Parallel 

w/Graphics 69.95 

Apricorn  16K  Expansion 

Board 82  95 

Apricorn  80 

Column  Brd.  .  ..64.95 
Apricorn  F1S232 

tnlerlace 69.95 

U-Prinl-Apple  IIC 

W/64K 109.95 

U-Prinl-Apple  IIC 

tv/16K 89.95 


^399 


APPLE  SOFTWARE 


BRODERBUND 

Print  Shop  33-95 

Print  Shop  Graphics 

I.  II  or  III ....17.95 

Print  Shop  Comp  27,95 

Karateka  21  K 

Caimen  Sandiego 2595 

Science  Tool  Kil 3995 

Bank  Sheet  Writer  ...44  95 
Fanlavislon  ........  Call 

ELECTRONIC  ARTS 

Adventure  Const 34.95 

Aictionll    27.95 

Bards  Tale 29.95 

Imagic  Football  2495 

Aulo-Duel 34  95 

Skyfox 2795 

Lords  ot  Conquest  ...2795 

One  on  One 2795 

Ultima  III 39,95 

Ultima  IV  39,95 

EPYX 

Ballblazer 2495 

Winter  Games 24  95 

Summer  Games  II,...  24  95 
World  sGrcai/ 

Foolball  24,95 

INFOCOM 

Soe  A  tar;  520Sr  section  tor 
ife/ris  a/icf  prices 

MICRQPRQSE 

Sae  A  tan  130XE  section  for 
Items  and  prices 

NIINDSCAPE 

Color  Me 2095 

Cioss*ord  Magic 34  95 

Haliey  Pioiect 29  95 

A  View  To  Kill 2795 

Rai:ter 29,95 

TheMisi 27  95 

Perlect  Score  ., 49,95 

Voodoo  Island  27  95 


DAVIDSON 

Matti  Blaster 34  » 

Alge-Blasler 34,95 

Spell  It 34  95 

Word  attack 34  95 

SIMON  &  SCHUSTER 

Typing  Tutor  III 34  96 

Koblashi  Adv 29,95 

Webster  Spell  Cbk  ..  .34.95 
Webster  Thesaurus . . .  B4  95 
Lovejoy  SAT 49  95 

SIR-TECH 

Wizardry/ DIam  2395 

Wizardry/ Legacy  ,.,,27  95 
Wizardry/Proving  ..,3395 
Wizardry/Wernda  ...2995 
Wiziprint 1995 

SSI 

See  Commodore  64  sec- 
rior?  for  (terns  S  prices. 
APPLE  MISCELLANEOUS 

BcMh-Head  23  95 

Beach-Headll 2395 

Gamemakei  27  95 

Hacker 2795 

Hardball 24  95 

Sundog 2795 

Paperclip 64,95 

DLMSoltware  Call 

The  Works 34,95 

Star  League  Base  ...23  95 

Educalc 34  95 

Friendly  Filei 27  95 

Note  Card  Maker  ....27  96 

Hayden  Soltware Call 

Microleague  Base   ...29  95 

Random  House Call 

PFS  Soltware Call 

Newsroom 39  95 

Galo 27  95 

Weekly  Reader Call 


■EST  1982 


COMMODORE 
128 

C  126Comptitor 
15/1  Disk  Drive 
1902  Monitor  .  . 
1670  Modem  .  . 
Weslildge  6470  300/ 
1 200  »IIO(«em..  179.95 


Call 
Call 
Call 
Call 


IBM  PC 

IBM  PC  SYSTEMS 

Configured  to  your 

specific  needs 

Call  for  lowest  price  on 

leiM-PC,  IBM  XT 

or  IBM-AT 

Corona  PC-400 

CampaUble  . .  Call 

Corona  Portable  PC 

Compatible  . .  Call 

PC  Multifunction 

Boards 

We  carry  the 

complete  line  of 

AST,  Hercules, 

Paradise,  STB, 

and  Quadram 

Call  for  current 

prices 
IBM  PC  SOFTWARE 

Print  Shop 3995 

Print  Shop  Graph.  I  ..2795 
Bank  Slreel  Writer...  4995 
Ancient  Art  of  War  . .  29.95 

SQRLAND 

Sidekick  37  95 

Turbo  Pascal  49  95 

BLUE  CHIP 

Baron  34  95 

Squire 34  95 

Millionaire  34,95 

Tycoon  34  95 

DIGITAL  RESEARCH 

Calf  fcr  iterr^s  antf  prices. 

INFOCOM 

See  Atari  520STfor  ifems 
and  pncBs 

LEADING  EDGE 

Nutshell  68.95 

LE/WP Basic  .,,....  67.95 
LE/Word  Proc 

^Speller 169-95 

MICRDPROSE 

F-15  Strike  Eagle  ....  23.95 

Kennedy  Approach  ,.  2795 

Aciojei 2795 

Silent  Service 27  9S 

MICROSOFT 

Flight  Simulator 38.95 

Word 249  00 

Mulliplan  134,95 

MINDSCAPE 

See  Apple  Section  for 
rfums  cirrrf  prices. 

SIERRA 

King's  Quest 34,95 

Kings  Quest  II  34,95 

Ultima  II  39,95 

THDUGHTWARE 

Calf  tor  ilerr^s  arid  prices. 

IBM  MISCELLANEOUS 

PFS  Call 

Galo 27  95 

WizarCiy 3995 

Strip  Poker 2?  95 

EleclricDesk  204  95 

D-Base  III  Call 

Sideways 39,95 

HomePak 34.95 

Satgonlll 34.95 

Pcachtree Call 

Jet 34  95 

BPI  Business Call 

Newsroom 3995 


COMMODORE 
128 SOFTWARE 

Multiplanfi4/I?B.  44  95 

Consultant 52,95 

PapnrClip 'Spell.  54,95 

Svjiftcalc 49,95 

Wordwriler 49,95 

Data  lulanager   . .  49,95 

Fleol  System  II  , .  44,95 

Superbase  128  ..  69  95 

Mncti  V/l?a  ....  34  95 


C-64  SUPER 

COMPUTER 

PACKAGE 

c-64  Computer 

1541  Disk  Drive 

BQ3  Printer 

ONLY  5399 

C.64  SUPER 
PRINTER  PKGS. 

SG-IO&G-Wiz    ...  279 
Panasonic  1091  S. 

G-Wiz 309 

Legend  IIBO  & 

G-Wiz 269 

If  Xelec  Supergraptiic 

Is  desired  add  SI  0 

to  package. 

Super  Pnmor  packages 

have  no  arlried  shipping  or 

cha/go  carp  surct^arges 

nrlrlori  when  shipper!  m 

Continenra!  USA 

Weslridge  AA/AO 
Modem    .  .  49.95 
Cardco 
G-Wlz  .  .  .  54.95 


GENERAL      11 
HARDWARE  [# 


SG-10 215 

SG-15 369 

SO-10 339 

SD-15 449 

SR-10 489 

SR-15 Call 

PRINTERS 

Panasonic  1091  245 

Legend  808 169 

Legend  1080 209 

Poweriype 309 

Juki  5510 389 

Epson  Call 

PRINTER  BUFFERS 

l^icrolazer From  169 

U  Bulll6K  79  95 

U  Bull64K  9995 

MODEMS 

us  Robotics  2400 469 

Volksmodem  1200 169 

Prometheus  1200 319 

Password  1200 209 

Novation Call 

PC  Modems  Call 


MONITORS 

TechnlkaMJ-22RGB. 

Sakata  SC-100 

Samsung  12"  Green  . 
Samsung  12"  Amb.  . 

Taxan  Call 

Amdek Call 

Commodore  1802 169 


..269 
..169 
7995 
79.95 


COMMODORi  64  SOFTWARE 


RO,  Box  17882.  Milwatikee,  Wl  53217 

ORDER  LINES  OPEN 

Mon-Fn  11  am  -  7  p  m.  CST»Sal.  12  p.m.  -5p,m,  CST 


To  Order  Call  Toll  Free 

800-558-0003 


^^  I- J  I.    laut  ^^  imi 

"X-ompai^bUltu}, 


ACCESS 

Beach-Head 21.95 

Beach-Head  II 24.95 

Raid/lvloscow 24.95 

Mach  VCatl 21.95 

INFOCOM 

Zork  I 24.95 

Zork  II,  or  III 27  95 

Deadline 29.95 

Slarcioss 29.95 

Witness  29.95 

Planetlall 24.95 

Hltchlker  24.95 

Enchanter 24.96 

Cutthroats .2496 

Soicerei 29.95 

Spellbreakei 29.95 

SSI 

Battaiiion 

Commander 24.95 

Bailie  of 

Antietnam,. , .  — 32.95 
Fighter  Command 

(NoAlati) -,.3795 

Norway  86 

INoAlail) 2195 

Panzer  Gtenidier 24,95 

USAAF 37,95 

Breakthrough/ 

Arilennes 37.95 

Kampgruppe  37.95 

Phanlasie 

(No  Atari) 24.95 

Broadsides 24  95 

Carrier  Force 37  95 

Comp  Ambush   3795 

Mech  Brigade 

(NoAtaiil 37.95 

Field  of  File 

(No  Applet  24  95 

Op  Mkt  Garden 3295 

Pro  Tout  Goll 

INoAlari) 24  95 

Gemslone  Warrior  ...2195 

Imp  Galactum 24  95 

Computet  Baseball... 24 95 
lomp  Ouarlerback. .  .24,95 


ELECTDDNIC  ARTS 

Adv,  Construction  . .  .29  95 
Mail  Order  l^onsiei  .  .2495 
Racing  Destruction  . .  .24  95 

Ultima  III 37.95 

Ultima  IV 41.95 

Bards  Tale 27  95 

See  Aran  t30XEsecttoritor 
rest  of  Items  ^  purees. 

EPYX 

Eidolon 24,95 

KoronisRifl   24  95 

Winter  Games 24  95 

Apshai  Trilogy 24  95 

Fasl  Load  Cart 24  95 

Program /Tool  Kit  ....2995 

MICROPROSE 

See  Atari  13QXE  section 
tor  Items  anp  prices 

MISCELLANEOUS 
COMMODORE  64 

Print  Shop  28  95 

Cal-Xit  3495 

Superbase  64 4795 

Karateka  2095 

Hacker 2095 

Gamemaker 2795 

Ultima  II 3795 

Karate  Champ  25.95 

Essex 27  95 

Kung  Fu/ 

Kong  Fu  Master 2595 

9  Princes  of  Amber  ...2295 
Spyvs  Spy  Vol  II  ...2395 

Maw  Golf 2495 

Internal  I  Hockey 19  95 

Ttie  Fourth  Proto  2395 

Blazing  Paddles 24  95 

Mirage  Word  34  95 

Mirage  Database 34  95 

Welcome  Aboard  ..  ..1995 

Super  Huey  14  95 

Spell  II 34  95 

Math  Blaster 34  95, 

Woid  Attack 34  951 

Odesia  Chess 4995 

Biimstone 27  95 


For  Technical  Info., 


Order  Inquiries,  or  for  Wise.  Orders 


414-351 -2007 


ORDERING  INFORMATION:  Pleaseipicllyjyita™.  For  fast  dehveiy  send  cashiers  check  or  money  order  Personal  and  company  checks  allow  14  Ijusmess  days  to  clear  School  ROs  welcome.  C.O.D.chirnH  in 
M,OO.InContinenialUS  A  include  S3  00  lor  software  orders,  4',,  shipping  for  hardware,  minimum  S4  DO  Master  Card  and  Visa  orders  please  Include  card  •expiration  dale  and  signature.  Wl  residents  please  include  S'l 
sales  tax  HI.  AKFPO.APD,  Puerto  Rico  and  Canadian  orders,  please  add  5°^shipping.iiilnliiiitiiiS5.l)0.  All  other  iDteigniirdiri  add  l5Sihippliig.iiiiiiiiiiumSIQ.liO.  All  ordeis  shipped  ouiside  the  Continental  U  S  A  are  shipped 
first  class  insured  U  S,  mail.  If  foreign  shipping  charges  exceed  the  minimum  amount,  you  will  be  charged  the  additional  amount  to  get  your  package  to  you  quickly  and  salely  All  goods  are  new  and  include  factory 
warranty  Due  to  our  low  prices  all  sales  a  re  fin  at  AlldBlBCtlvirBturniinuithivtari1uritiuttiDrlzi1ionnuiiil>er,  Please  call  (414)  35 1-2007  lo  obtain  an  R  A  'otyoui  return  will  not  be  accepted  Prrces  and  availability  subiect  to 
change  without  notice 


Classified 


SOFTWARE 


TI-99/4A  NEW  STATES  AND  CAPITALS  GAME 

Hi-Res  map  of  USA.  Send  $12  for  cass. 

Or  $i  for  more  info,  to:  TRINITY  SYSTEMS 

1022  Grandview,  Pittsburgh,  PA  15237 

TI-99/4A  QUALITY  SOfTWARE  for  Business, 
Home  and  Entertainment  "  BONUS  Software 
Offer!  "  Send  for  FREE  Catalog  to  MICRO-BIZ 
HAWAII,  Box  1108  Pearl  City,  HI  96782 

TI-99/4A  Software/Hardware  bargains. 
Hard-to-find  items.  Huge  selection. 
Fast  service.  Free  catalog.  D.E.C., 
Box  690,  Hicksville,  NY  11801 

FANTASTIC  DAILY  NUMBER  FORECASTER! 
Guaranteed  Winners  or  Money  Back! 
Picks  up  to  3  STRAIGHT  WINNERS  most 
every  week,  playing  1  to  3  a  day! 
Apple,  IBM,  C64,  Atari,  1  drive.  Many 
reports  of  hitting  for  THOUSANDS.  Send 
SASE  for  info.  $99.95  on  disk  only  to: 
Z-Way,  P.O.  Box  9017,  Canton,  OH  44711 

PROGRAMS  FOR  THE  TANDY  1000 
Send  $1  for  list  of  educat.  &  entertainment 
programs.  Refundable  with  first  purchase. 
SODA  POP  SW,  FOB  653,  Kenosha.  WI  53141 

FREE  APPLE  SOFTWARE 

Over  1,000  Public  Domain  Programs  on  50 

diskettes,  $5  each,  plus  $1  shipping  per  order. 

Send  $1  for  catalog,  refundable. 

C  &  H  Er4TERPRISES 

Box  29243,  Memphis,  TN  38127 

TI-99/4A  DISK  OWNERS:  Great  new  software 
for  home  and  business  -  SCHEDULE  MANAGER 
($19.95),  DISK  DATA  BASE  ($15.00)  TUNNELS 
OF  DOOM  GAME  EDITOR  ($20.00),  etc.  Send 
orders  to  ASGARD  SOFTWARE,  P.O.B.  10306, 
ROCKVILLE,  MD  20850.  Catalog  on  request. 

LOTTO  PICKER.  Improve  your  chances  for  those 
Million  Dollar  Jackpots!  Picks  LOTTO,  WIN-4,  & 
Daily  Numbers.  All  USA  &  Can.  games  incL 
Expandable!  IBM/C64/TI99  $29.95.  Order  Now! 
1-800-341-1950  Ext.  77.  Mail  Orders:  Ridge,  170 
Broadway,  #201-C,  NYC,  NY  10038.  Catalog. 

SAVE  MONEY!  EASY  TAX  SIMPLIFIES  THE  15 

most  common  IRS  tax  forms.  Faster,  line 
by  line  preparation  on  screen/printer. 
Commodore  64,  disk.  Send  $39.95  plus  $2.00 
s.h.  to  Hybrid  Software,  1739  SchUdei  Lane, 
Waverly,  OH  45690 

PROJECT  PLANNING/MANAGEMENT  using 
the  C64,  SX,  or  C128.  Data  sheet  for  SASE  - 
Prgm  for  $106.95  (CA  res.  add  6%  sis  tx). 
LAWCO,  Dept.  C,  Box  2009,  Manleca,  CA  95336 

Qeneaiogy  Program  for  the  C64.  "FAMILY 
TREE"  will  produce  Pedigree  Charts,  Family 
Group  Records,  Individual  Files,  Indexes,  Searches 
of  Ancestors.  LDS  version  available.  "The  Best" 
genealogy  program  for  the  64.  $49.95, 
GENEALOGY  SOFTWARE,  POB  1151,  PORT 
HURON,  MI  48061,  (519)  344-3990, 

Animal  Records  maintained  with  "PETI6REE" 
for  the  C64.  Produces  Litter,  Awards,  Breeding 
Show,  Individual  Records,  Pedigree  Charts. 
$69.95.  GENEALOGY  SOFTWARE,  POB  1151, 
PORT  HURON,  MI  48061,  (519)  344-3990. 

FREE  SOFTWARE  CATALOOI 

Call  Toll-Free  1-800-554-1162,  Tevex,  Inc. 
Save  %  off  retail  prices.  We  cany  SSI, 
Elect,  Arts,  Infocom,  and  many  more! 
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CHEMISTRY  TUTORIAL  -  Science  software 
programs  idea  for  teaching  and  reriew 
of  the  basics  of  chemistry.  The  chemical 
and  physical  properties  of  106  known 
elements.  This  program  has  a  complete 
and  unique  presentation  of  the  PERIODIC 
TABLE.  Supplied  on  dual-sided  disk 
(C64  and  Apple  !Ie  versions)  .  .  .  $29.95. 
SPRINGHILL  LABORATORY  COMPUTER  SOFT- 
WARE, P.O.  Box  155,  Clarksvilie,  Ohio  45113 

C64  USERS  -  FREE  BROCHURE!  Game  and 
instructional  programs,  each  include  detailed 
analysis,  beg.  or  int.  level.  SASE  to: 
C16  H.O.S,  19730  Ave  18,  Madera,  CA  93637 

FREE  CATALOG.  Specify  TI99,  Commodore, 
IBM.  Hardware,  Software,  Accessories. 
Competition  Computer,  2629  W.  National, 
Milwaukee,  WI  53204  (800)  662-9253 

Maxell  MDl,  $1.29-MD2,  IE1.99.  Dysan  104/lD, 
S1.79-104/2D,  $2.39.  Shipping  $3.75.  Also 
Verbatim,  IBM,  3M,  BASF  TAPE  WORLD,  220 
Spring  St.,  Butler,  PA  16001,  t-800-245-6000-. 
Visa,  MC. 

COMMODORE:  TRY  BEFORE  YOU  BUY.  Top  25 
best-selling  games,  utilities,  new  releases.  Visa, 
MasterCard.  Free  brochure.  Rent- A- Disk,  908  9th 
Ave.,  Huntington,  WV  25701  (304)  522-1665 

ATARIWARE:  The  BEST  PD  software  from  Atari 

Enthusiasts  across  the  U.S.!  80  disks  to 
choose  from  $5  each.  Catalog  with  SASE. 
KD-ACE,  1187  Dunbar  Ct.,  Orange  Pk,  FL  32073 

DISK  SALE!  -  SS/DD  35-tTk  for  Apple  w/sleeve 
&  label-10/$5.80,  bulk-100/$45.  Standard 
SS/DD  w/sleeve  &  label-10/$7.50,  bulk- 
100/S59.  DS/DD  w/sleeve  &  label- 10/$8.50, 
bulk-100/$67.  3V:"  SS  for  Mac-10/$19.99. 
PREMIUM  QUALITY,  LIFETIME  WARRANTY! 
Money-back  satisfaction  guarantee!  Min.  order 
$20.  Send  check  or  pay  by  MC/VISA/AE  $3 
shipping,  -t-  $2  if  C.O.D.  -  UNITECH,  20  Hurley 
St.,  Cambridge,  MA  02141.  (800)  343-0472,  in 
Mass,  (617)  "UNI-TECH". 

INTEREST  CALCULATIONS. 

MAI-2.10  lets  your  computer  help  analyze 
investment  decisions.  Calc:  future  value,  present 
value,  annuities,  sinking  funds,  loan  pymt 
sched.,  +  more!  Menu  driven/Simpie.  IBM 
PC/XT/jr  or  compat.  Only  S49.95  -1-  $7  s/h/t. 
ck/mo.  Munier  Associates,  inc.,  Dept.  A5, 
P.O.  Box  79314,  Houston,  Texas  77279 
(713)  784-4348. 

FREE  CATALOG  .  .  .  PRINTER  PAPER 

Discount  Prices  .  .  .  Quick  Delivery 
Universal  Services,  Inc.,  P.O.  Box  484, 
Grand  Haven,  Michigan  49417 

I  HARDWARE                                            1 

Heyl  Monitor  Cables  $5.95.  Joystick  ext.  6'- 

$3.95,  l2'-$4.95.  p/h  ind.  Comdr  Disk  +  Print 
Cables  Custom  $3  +  .75/ ft.  -1-  p/h.  JCRL,  5043 
E.  MitchelL  Phoenix,  AZ  85018  (602)  990-4643 

BUY/SELL  USED  MICRO  EQUIPMENT 
Quickly,  easily.  National  Listing  Service. 
No  Commission.  TEHRAN,  1-800-832-8726 
(orders)  1-617-491-4888  (info.) 

HARDWARE  &  SOFTWARE  30%  BELOW 
RETAIL.  Apple,  Atari,  C64,  IBM-FC,  Tl-99.  Over 
lOOO  titles.  Hard  to  find  items.  Atari  520  ST 
Computer/Color-$829.00.  Send  $1.00  for 
catalog.  Specify  computer.  Multi- Video, 
P.O.  Box  246,  East  Amherst,  NY  I405I. 

EARN  MONEY,  PART  OR  FULL  TIME,  AT 
HOME  with  your  computer-manual  &  forms- 
$9.95.  Write  Computer  Programs  for  Profit! 
How-to  guide  with  forms,  letters,  tips-$7.95. 
Also-Computer  Consultant  Handbook.  How  to 
earn  $  consulting  with  businesses 7.95.  JV  Tech, 
P.O.  Box  563,  Ludington,  Ml  49431 

SERVICE  MANUAL  WITH  SCHEMATICS  FOR 
ATARI  800XL-$19.50;  Atari  1050-$I9.50.  (805) 
927-4667.  Visa/MC.  Free  catalog.  Elech-onic 
Dimension,  Box  1846,  San  Luis  Obispo,  CA  93406 

IBM  PCJR  REPORT:  THE  NATIONAL  NEWS- 
LETTER. PCjr-specific  articles,  reviews.  Public 
Domain  from  across  the  nation.  $lS./yr.  PCJR 
CLUB,  POB  95067,  Schaumburg,  IL  60195 

I  MISCELLANEOUS                                    1 

RIBBONS  for  ANY  PRINTER  at  LOW  PRICES!! 

DELTA  MICRONiCS 

BOX  10933,  ERIE,  PA  16514 

(814)  455-5667 

HELP  IS  ON  THE  WAYI 

Just  call  1-800-334-0868  to  get  your  free 
copy  of  the  latest  COMPUTE!  Books  Catalog! 
If  you  need  help  in  getting  information  on 
all  of  the  latest  COMPUTE!  book  titles 
available  plus  all  COMPUTE!  backlist  titles, 
call  us  today! 

Don't  take  chance  of  LOSING  DATA  caused  by 
HUMIDITY.  Disk  manufacturers  spec.  80%  max. 
Get  15  reusable  drypacks  for  only  S2  to 
protect  all  your  disks  permanently. 
CHINGHAI,  Box  2687,  Costa  Mesa,  CA  92628 

COMPUTEI  Classified  is  a  low-cost  way  to  tell  over  350,000  microcomputer  owners 
about  your  product  or  service. 

Rates:  $25  per  lino,  minimum  of  tout  lines.  Any  or  all  of  the  first  lino  set  in  capilal  letters  at  no  charge.  Add  SIS 

per  line  far  boldface  words,  or  S50  for  the  entire  sd  set  in  boldface  (any  number  of  lines.) 
Tenns:  Prepayment  is  required.  Check,  money  order,  American  Express,  Visa,  or  MasterCard  is  accepted.  Make 

checks  payable  (0  COMPUTE!  Publications. 
Form:  Ads  are  subject  to  publisher's  approval  and  must  be  either  typed  or  legibly  printed.  One  line  equals  40 

leiters  and  spaces  between  words.  Please  underline  words  to  be  set  in  boldface. 
General  Informationt  Advertisers  using  post  office  box  numbers  in  their  ads  must  supply  permanent  address  and 

telephone  numbers.  Orders  will  not  be  acknowledged.  Ad  will  appear  in  next  available  issue  after  receipt. 
Closing:  10th  of  the  third  month  preceding  cover  date  (e.g.,  June  issue  closes  March  lOlh).  Send  onlcr  and 

remittance  to:  Hanry  Blair,  Classified  Manager,  COMPUTE!,  P.O.  Box  5406,  Greensboro,  NC  27403.  To  place  an 

ad  by  phone,  tall  Harry  Blair  at  (919)  275-9809. 
Notice:  COMPUTE!  Publications  cannot  be  responsible  for  offers  or  claims  of  advertisers,  but  will  attempt  to  screen 

out  misleading  or  questionable  copy. 

MUST  LIQUIDATE  SUJIr^^r 

TOTAL  Personal  computer  system 


Factory  Reconditioned  with 
Factory  Warranty! 


<^ 


Carries  easily 
as  a  suitcase! 
Piugs  into  115V  outlet! 


GREAT  GIFT  IDEA! 


/ 


Sorry,  we're  not  permitted  to  PRINT  the  famous  brand-name. 
BUT,  we  CAN  'tell  all"  if  you  call  us  TOLL  FREE:  1-800-328-0609! 


THE  COMPUTER 

Snap-nn  computer  keybiiardl  64K  RAM,  20K  ROM.  Full- 
size  typewriter  keyboard.  Upper  and  lower  case 
letters,  numerals,  symbols,  reverse  characters.  2 
cursor  control  keys,  4  function  keys,  programma- 
ble to  8.  Music  synthesizer  with  3  independent 
voices,  eact)  with  9  octave  range,  Inpul/output ports 
accommodate  . . .  user,  serial.  ROM  cartridge,  joy- 
sticks, external  monitor,  phone  modem. 

BuiIMn  disk  drivel  Intelligent  tiigh  speed  unit  with 
5'/i"  floppy  disk  recorder.  170K  formatted  data  stor- 
age; 35  tracks.  16K  ROM.  Uses  single  sided,  single 
density  disk.  Serial  interface.  Second  serial  port  to 
chain  second  drive  or  printer. 
Built-in  calof  monitor  I  Displays '10  columns  x25  lines 
of  text  on  5"  screen.  High  fesolulion.  320  x  200  pix- 
els.  16  background,  character  colors. 

Built-in  ROM  cartridge  portl  Insert  ROM  program  car- 
tridge. Multitude  of  sut>jects  available  in  stores 
across  the  nation! 


Original  Ust  Price 


>995.00 


$ 


Uquidation 

Priced 

At  Only  

Item  H-9Z7-63631  -00  Ship,  handling:  SZO.OO 


388 


THE  PRINTER 

Print  metliod;  Bi-directional  impact  dot  matrix. 

Character  malrix:  6  x  7  dot  matrix. 

Cliaracters:  Upper  and  lower  case  letters,  numerals 

and  symbols.  All  PET  graphic  characters. 

Graphics:  7  vertical  dots  —  maximum  480  columns. 

Dot  addressable. 

Character  codes:  CBM  ASCIi  code. 

Print  speed:  60  characters  per  second. 

Maximum  columns:  80  columns. 

Cliaracter  spacing:  10  characters  per  inch. 

Line  lead  spacing:  6  lines  per  inch  in  character  mode 

or  8  lines  per  inch  selectable.  9  lines  per  inch  in 

graphics  mode. 

Line  leed  speed:  5  lines  per  second  in  character  mode, 

7,5  lines  per  second  in  graphics  mode, 

Paper  feed:  Friction  feed. 

Paper  widlli:  4.5"  to  8.5"  width. 

Multiple  copies:  Original  plus  maximum  of  two  copies. 

Dimensions:  13"W  x  8"D  x  3V/'H.  Wt.:  6'/?  lbs.  Power: 

120V  AC,  60  Hz, 

Original  Ust  Price:  *200.00 


THE  SOFTWARE 

"Easy  Script"  One  of  the  most  powerful  word  pro- 
cessors at  any  price!  Cut  re-typing,  create  docu- 
ments from  standard  paragraphs,  do  personalized 
letters,  see  and  change  a  document  before  it  is  print- 
ed. Instruction  manual  has  extensive  training  sec- 
tion that  simplifies  use  . . .  even  for  someone  who 
has  never  used  a  computer  or  word  processor  before! 
"Tlie  Manager"  A  sophisticated  database  manager 
for  business  or  Ijome  use.  Business  uses:  accounls 
paya&le/receivable,  inventory,  appointments,  task 
manager.  Home  uses:  mailing  lists,  home  inventory, 
recipes,  collection  organizer,  investment  tracking, 
checkbook  balancing.  School  uses:  research  arti- 
cle index,  gradebook. 


$24 


Liquidation 

Priced  At 

Hem  H-927-63831-00  Ship,  hondling:  S7.00 


$119 


Compatible  with  above  Computer  System  ( Not  included  in  package  price.) 

HAK  IflnnFM    Factorv  New/FirsI  Quslilvl 
CVn  HlvWtin    190. Day  Lmt.  Factory  Worranty,) 


lOYSTiCKS  (Set  of  2) 
Mfr.  List  $59.90  pr.     $  1  Q 

Liquidation  Price I  W  pr. 

Item  H-927-63622.01  S/H;  S4.00  pr. 


Mfr.  List:  *124.95 
Uquidation  Price .... 


$19 


Item  H-927.6364a-00  S/H:  S4.00 


Mfr.  Sug.  Retail:  ^73.98 
Uquidation  Price 

Horn  H-927-640n -03  Ship,  handling:  S3.00 

BUY  INDIVIDUAL  UNITS  OR 

GET  THIS  ULTRA-FAMOUS 

SYSTEM  AT  ONE  LOW 

PACKACE  PRICE! 

TOTAL  Personal  Computer  System 
available  at  FAR  BELOW  dealer  cost! 

Original  Ust  Price ^1,293>UU 

t 


TOTAL 
PACKAGE 
PRICE . . . 


488 


Hem  H-927-640n-02  Ship,  handling:  $24,00 


T 


Crwiit  ccrd  mflmbttrB  can  ordor  by  phons, 
24  houri  a  doV'  7  dayi  a  waak. 

Toil-Free:  1-800-328-0609 

Your  fittack  h  walcom^l 

No  Oatays  wh«n  you  pay  by  Chech  I 


CsObMbBb  Direti  Marlteting  Carp, 
Authorized  Liquidator 

14605  28th  Ave.  N.«Mpls..lUIN55441-3397 


SEND  ME  THE  ITEMS  I  HAVE  LISTED  BELOW 

Sales  outside  contlnenlal  U.S.  are  subjecl  la  special 
conditions.  Please  call  or  write  to  inquire. 


TOTAL 


CO-M.B.  Direct  Marketing  Corp.  Itenn  H-927 

T460S  2ath  Ava.  NVMioneapolis.  MN  55441-3397 

Send  the  items  indicated  at  left.  (Minnesota  residents  add  &% 
siilas  tan.  Please  allow  3-4  weeks  de!i«&rV'  Sotry.  no  C.O.D.) 
G  My  check  or  money  order  is  enclosed.  (No  delays  in  pracessmg 

ordeis  paid  by  check,  thinks  to  TeleCheck.) 
Charge:  G  MasterCard,     IZ  VISA- 

Acct.  No. Exp — = 

PLEASE  PRINT  CLEARLY 


Nam«)  . 


Citv- 


Sign  Here 
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Features  Precision  Tools  and 
Equipment  for  Computers 


^p&l 

1 

Jensen's  new  catalog  features  hard-to- 
find  precision  tools,  tool  kits,  tool  cases, 
test  equipment  and  computer  acces- 
sories used  by  sophisticated  hobbyists, 
scientists,  engineers,  laboratories  and 
government  agencies.  Call  or  write  for 
your  free  copy  today. 


7815S.  46lh  Street 
Phoenix.  AZ  85044 
(602)  968-6231 


jeNSEN 

TOOLS  INC. 


PREMIUM  qUALITYl      UFETIME  WARRANTYl 

DISK  SALE! 
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UNITECH 


IN  MA&S:  f*  17V'  UHI-TEC  H* 

to-  HUttLtYST. 

CAMBHrDGr,  MA  02141 


Foolish  to 
pay  more. 

Dangerous 
to  pay  less. 


•  QUALITY  MEDIA 

•  LIFETIME 
REPLACEMENT 
GUARANTEE 

•HUB  RINGS 
•TYVEC  EPS. 

•  WRITE  PROTECTS 


1-50 
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.89 

1.Q9 

1.99 


51  + 
.69 
.79 
.99 

CALL 


4^ 


S.25"  SSDD 

5.Z5  ■  DSDD 

PC  FORMAHED 

AT1.2MB,3.5  1D(Mac) 

PO   Box  aB33B2 

Rl  triTGuiD  San  Francisco,  CA  94188 
Dl^lilOnlr  in  Calilorma  415-550-0512 

<■"■'■'■■"'•  sup^'     USA  orde.s  800-431-6249 
In  Canada  403-428-6229 

Add  Sa  00  sliiDping  and  handling  p!?r  1 00  DisheTles 

COD  adfl  SI  95   ICA  lesidenls  add  S  3^»  sales  las 

VISA  MC  COD 


COMPUTEI's 

FREE  Reader  Information  Service 

Use  these  cards  to  request  FREE  information  about  the  products  ad- 
vertised in  this  issue.  Cieorly  print  or  type  your  fuii  name  and  address, 
Only  one  card  should  be  used  per  person.  Circle  the  numbers  that 
correspond  to  the  key  number  appearing  in  the  advertisers  index, 

Send  in  the  card  and  the  advertisers  will  receive  your  inquiry.  Al- 
though every  effort  is  made  to  insure  that  only  advertisers  wishing  to 
provide  product  information  have  reader  service  numbers,  compute! 
cannot  be  responsible  if  advertisers  do  not  provide  literature  to 
readers. 

Please  use  these  cards  only  for  subscribing  or  for  requesting  product 
information.  Editorial  and  customer  service  inquiries  should  be  ad- 
dressed to:  COMPUTEI,  P.O.  Box  5406,  Greensboro,  NO  27403.  Check 
the  expiration  date  on  the  card  to  insure  proper  handling, 

Use  these  cards  and  this  address  only  tor  computei's  Reader  Infor- 
mation Service.  Do  not  send  with  paymenf  in  any  form. 

COMPUTE! 
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Please  let  us  know.  Do  you 
own:  plan  to  buy: 

D    Apple . 

270 

a 


172 

D 

Hi 

a 

276 
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Atari 

Commodore 
IBM 


TI-99/4A 
Other  _ 


D 

271 


(Specify  model) 


D 

273 
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275 

a 

277 

D 

279 

D 

2&1 


Please  print  or  type  name  and  address. 
Limit  one  card  per  person. 

Name 


Address 


City 


Stale/Province 
Country 


Zip 


Please  Include  ZIP  Code 


Expirotion  3/31/86 


C0266 


SUBSCRIBE  TO  COMPUTE! 


My  Computer  Is: 
01  n  Apple     02  D  Atari 
04  D  VIC-20     05  D  IBM 
w  n  other 


03  D  Commodore  64 
06nTI-99/4A 
D  Don't  yet  have  one. 


For  Fastest  Service, 

Call  Our  Toil-Free 

US  Order  Line 

800-334-0868 

In  HC  call  919-275-9009 


D  $24.00  One  Year  US  Subscription 
D  $45,00  Ivjo  Year  US  Subscription 


(Readers  outside  of  the  US,  please 
see  our  foreign  readers  subscription 
card  or  inquire  for  rotes). 


Name 

Address 

City 

State 

Zip 

D  Payment  Enclosed 
Charge  my:  D  VISA 
Account  No. 

n  Bill  me 
D  MasterCard 

n  American  Express 
Expires             / 

Vour  subscflption  will  begin  with  the  nent  available  issue.  Pleas©  allow  4-6  weeks  for  delivery  of  first  issue,  Subscription  prices 
subject  to  change  at  anv  time. 

The  COMPUTEI  subscriber  list  is  moPe  available  to  caretuiy  screened  ofganizations  with  a  product  or  se/vice  which  moy  be  of 
merest  to  our  reoders.  II  yoo  pfefer  not  to  receive  such  mailings,  please  check  this  box  D  -"260 


Place 

Stamp 

Here 


COMPUTE!  Reader  Service 

P.O.  Box  2141 
Radnor,  PA  19089 


NO  POSTAGE 

NECESSARY 

IF  MAILED 

IN  THE 

UNITED  STATES 


BUSINESS  REPLY  MAtL 

FIRST  CLASS  PERMIT  NO.  7478  DES  MOINES,  IOWA 


POSTAGE  WILL  BE  PAID  BY  ADDRESSEE 


COMPUTE! 

PO  BOX  10954 

DES  MOINES,  IOWA  50347 


RUSH  POSTAGE-PAID  CARD        check 
FOR  YOUR  FREE  CATALOG  ^  0*^^ 

•  COMPUTER  ELECTRONICS  irBining  prepares  yau  to  service 
and  fepaii  all  compulets  as  you  build  yoyr  own  IB-bil  IBM 
PC  compatible  comppier.  Total  system  program  includes  disk 
drive,  lest  eauipmem,  bundled  software,  and  NRI  Discovery 
Lat). 

•  TVfVIDEO/AUDro  SERVICING  Includes  tialning  with  27" 
color  TV  with  built-in  stereo  decode;,  VCR,  and  actual 
Instruction  on  videotape. 

•  SATELIITE  COMMUNICATiaNS  training  gives  you  the 
skills  10  service  both  commercial  and  consumer  satellite 
earth  station  etiulpment  as  you  assemble  your  own  home 
satellite  TV  system. 

•  ROBOTICS  ifaining  features  remote-controlled  mobile  pro- 
grammable robot  you  build,  eiperlment  with,  and  keep  along 
with  other  lest  equipment. 

.  IHOUSTRIAL  ELECTRONICS  training  prepares  you  to 
service  antl  maintain  compuler-contralled  Imlusinjl  a^sleffls. 
TfainInQ  includes  color  computer,  disk  ilve,  exclusive  NRI 
training  software,  and  NRI  DiscDveiy  Lab. 


Name 

(Please  Print) 

Afle 

Street 

Cily 

Slate 

Zip 

n  Computer  Electronics 

O  TVWideo/Audio  Servicing 

D  Satellite  Communications 

D  Robotics 

D  Data  Communications 

D  Industrial  Electronics 

D  Cammunicatlons 
Electronics 

D  Electronic  Design 
Technology 

D  Telephone  Seri/icing 

U  Cigital  Electronics 

n  Basic  Electronics 

D  Bookkeeping  &  Accounting 

CD  Appliance  Servicing 

D  Small  Engine  Servicing 

D  Air  Conditioning,  Heating, 
Refrigeration,  &  Solar 
Technology 

n  Locksmiltiing  &  Electronic 
Security 

CH  Building  Construction  & 
Remodeling 

n  Automotive  Servicing 


Accredited  by  tfie  National  Home  Study  Coundl 


198-026 


F«  career  courses  approved 
under  Q.l.  Bill  .J  Check  lor  details. 
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Flight  Simulator 

,     Scenery  Disks 

The  Challenge  of  Accomplished  Flight 

With  a  realism  comparable  to  (and  in  some  ways  even  surpassing) 
$100,000  aircraft  flight  simulators.  Flight  Simulator  II  Includes  full 
flight  instrumentation  and  avionics,  and  provides  a  full-color  out-the- 
v^indow  view.  Instruments  are  arranged  in  the  format  standard  to 
modern  aircraft.  All  the  radios  needed  for  IFR  flight  are  included. 
Front,  rear,  left,  right,  and  diagonal  views  let  you  look  in  any  direction. 
Program  features  are  clearly  documented  in  a  96-page  Pilot's  Operat- 
ing Handbook. 

For  training  in  proper  flight  techniques.  Flight  Simulator  II  includes 
another  96-page  instruction  manual,  compiled  by  two  professional 
flight  instructors  with  over  8,000  hours  flight  time  and  1 2,000  hours 
of  aviation  teaching  experience.  You'll  learn  correct  FAA- 
recommended  flight  procedures,  from  basic  aircraft  control  through 
instrument  approaches.  To  reward  your  accomplishments,  the 
manual  even  includes  a  section  on  acrobatic  maneuvers. 


The  Realism  and  Beauty  of  Flight 

Go  sight-seeing  over  detailed,  realistic  United  States 
scenery.  High-speed  graphic  drivers  provide  an 
animated  out-the-window  view  in  either  day.  dusk,  or 
night  flying  modes. 


Apple  and  Atari  versions  will  be  released  soon.  Each  disk  covers  a 
geographical  region  of  the  country  in  detail,  and  Is  very  reasonably 


The  Pure  Fun  of  "World  War  I  Ace"     - 

When  you  think  you're  ready,  you  can  test  your  flying  skills  with  the 
"World  War  I  Ace"  aerial  battle  game.  This  game  sends  you  on  a 
bombing  run  over  heavily-defended  enemy  territory.  Six  enemy 
fighters  will  attempt  to  engage  you  in  combat  as  soon  as  war  is 
declared.  Your  aircraft  can  carry  five  bombs,  and  your  machine  guns 
are  loaded  with  1 00  rounds  of  ammunition. 

See  Your  Dealer.  Flight  Simulator  II  is  available  on  disk  for  the 

Apple  II,  Atari  XL/XE,  and  Commodore  64/128  computers  for 
$49.95.  Scenery  Disks  for  the  C64  and  IBM  PC  (Jet  or  Microsoft 
Flight  Simulator)  are  $  1 9.95  each.  A  complete  Western  U.S.  Scenery 
six-disk  set  is  also  available  for  $99.95.  For  additional  product  or 
ordering  information,  call  (800)  637-4983. 

Apple  II  IS  .1  tndcrnark  of  Apple  Computer.  Inc 
Ann  XL  .ind  Xt  are  iradcmarks  of  Atari  Corp 
*^  CommtKlore  64  and  I2B  are  iradcfuarks  of  CommodtJre  Etectroniei  Ltd. 
IBM  PC  IS  a  registered  iradcrrark  of  Iniermtional  Biisiness  ^ 


Flight  Simulator  II  features  over  80  airports  in  four 
different  scenery  areas:  New  York,  Chicago,  Seattle, 
and  Los  Angeles.  Six  additional  Scenery  Disks  covering 
the  entire  Western  half  of  the  United  States  are  now 
available  in  IBM  and  C64/I2B  disk  formats. 


LOGIC 


713  Edgebrook  Drive 
Champaign  IL  61820 

(217)  359-84e2Telex:  206995 

Order  Line:  (800)  637-4983 
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write  a  novel 


fix  an  engine 


•  ^ 

compose  o  song 


point  0  picture 


r  banking 


learn  to  fly 


organize  o  data  base 


tell  a  sroh/ 


©  I9a5.  Commodore  tiecrronics  Limiled 
®  CP/Mi$o  registered  trQdemarle  of  Digital  Be^arch.  IrK 
®  Apple  is  a  registered  Irademont  of  Apple  Cotnpuler,  Irtc 
^  l&M  IS  0  registered  tcdderr^Gilc  ot 

IntemoltotH:!  Business  M<JCtTines  Corporation 


When  it  comes  fo  personal  computers, 
you  want  the  smaitesf  you  can  own.  Af 
a  price  that  makes  sense. 

The  new  Commodore  128™  system 
has  a  powerful  128K  memory 
expandable  to  51 2K.  An  80-column 
display  and  64, 128  and  CP/M®  modes 
for  easy-access  to  thousands  of 
educational,  business  and  home  programs. 
And  a  keyboard,  with  built-in  numeric 
keypad,  that  operates  with  little  effort. 
Discover  the  personol  computer 
that  does  more  for  you.  At  the 
price  you've  been  waiting  for.  '-•..... 
From  the.company  that  sells 
more  personal  computers 
than  IBM®  or  Apple® 

COMMODORE  128'  PERSONAL  COMPUTER 

A  Higher  Intelligence 


